Developer CD Series 2000 February: Tool Chest

home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 February: Tool Chest / Dev.CD Feb 00 TC.toast / pc / tool chest / macapp / install macapp r13u4 / Apple Frameworks / MacApp / Examples / Calc / UCalc.cpp < prev next >
MacBinary | 1998-10-13 | 105.1 KB | [TEXT/CWIE]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Tue Oct 13 06:00:00 1998, modified Tue Oct 13 06:00:00 1998, creator 'CWIE', type ASCII, 106856 bytes "UCalc.cpp" , at 0x1a1e8 614 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[CWIE]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 09 55 43 61 6c 63 2e | 63 70 70 00 00 00 00 00 |..UCalc.|cpp.....|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 43 57 49 | 45 01 00 00 00 00 00 00 |.TEXTCWI|E.......|
|00000050| 00 00 00 00 01 a1 68 00 | 00 02 66 b2 48 d5 20 b2 |......h.|..f.H. .|
|00000060| 48 d5 20 00 00 0c 00 00 | 00 00 00 00 00 00 00 00 |H. .....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 4f 42 00 00 |........|....OB..|
|00000080| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00000090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2f 2f 20 55 43 |--------|--.// UC|
|000000e0| 61 6c 63 2e 63 70 0d 2f | 2f 20 43 6f 70 79 72 69 |alc.cp./|/ Copyri|
|000000f0| 67 68 74 20 a9 20 31 39 | 38 35 2d 39 38 20 62 79 |ght . 19|85-98 by|
|00000100| 20 41 70 70 6c 65 20 43 | 6f 6d 70 75 74 65 72 2c | Apple C|omputer,|
|00000110| 20 49 6e 63 2e 20 41 6c | 6c 20 72 69 67 68 74 73 | Inc. Al|l rights|
|00000120| 20 72 65 73 65 72 76 65 | 64 2e 20 0d 2f 2f 2d 2d | reserve|d. .//--|
|00000130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000180| 2d 2d 2d 2d 2d 2d 0d 0d | 2f 2a 0d 09 43 68 61 6e |------..|/*..Chan|
|00000190| 67 65 20 48 69 73 74 6f | 72 79 3a 0d 09 09 30 37 |ge Histo|ry:...07|
|000001a0| 2f 31 35 2f 39 38 09 5b | 54 59 5d 20 4d 61 6e 79 |/15/98.[|TY] Many|
|000001b0| 20 64 79 6e 61 6d 69 63 | 5f 63 61 73 74 5f 41 43 | dynamic|_cast_AC|
|000001c0| 20 63 68 61 6e 67 65 73 | 2c 20 69 74 65 72 20 63 | changes|, iter c|
|000001d0| 68 61 6e 67 65 73 2c 20 | 65 74 63 2e 0d 09 09 30 |hanges, |etc....0|
|000001e0| 36 2f 31 32 2f 39 38 09 | 5b 32 32 31 36 33 35 37 |6/12/98.|[2216357|
|000001f0| 5d 20 52 65 6d 6f 76 65 | 64 20 72 65 66 65 72 65 |] Remove|d refere|
|00000200| 6e 63 65 20 74 6f 20 76 | 6f 6c 61 74 69 6c 65 2e |nce to v|olatile.|
|00000210| 0d 09 09 30 35 2f 32 38 | 2f 39 38 09 46 69 78 20 |...05/28|/98.Fix |
|00000220| 63 6f 6d 70 69 6c 65 20 | 65 72 72 6f 72 73 2e 20 |compile |errors. |
|00000230| 0d 2a 2f 0d 0d 2f 2f 20 | 43 61 6c 63 0d 0d 23 69 |.*/..// |Calc..#i|
|00000240| 66 6e 64 65 66 20 5f 5f | 55 43 41 4c 43 5f 5f 0d |fndef __|UCALC__.|
|00000250| 23 69 6e 63 6c 75 64 65 | 20 22 55 43 61 6c 63 2e |#include| "UCalc.|
|00000260| 68 22 0d 23 65 6e 64 69 | 66 0d 0d 2f 2f 20 41 43 |h".#endi|f..// AC|
|00000270| 53 0d 0d 23 69 66 20 71 | 41 4c 4f 45 0d 23 09 69 |S..#if q|ALOE.#.i|
|00000280| 66 6e 64 65 66 20 5f 5f | 55 4f 44 47 72 61 70 68 |fndef __|UODGraph|
|00000290| 56 69 65 77 5f 5f 0d 23 | 09 69 6e 63 6c 75 64 65 |View__.#|.include|
|000002a0| 20 22 55 4f 44 47 72 61 | 70 68 56 69 65 77 2e 68 | "UODGra|phView.h|
|000002b0| 22 0d 23 09 65 6e 64 69 | 66 0d 0d 23 09 69 66 6e |".#.endi|f..#.ifn|
|000002c0| 64 65 66 20 5f 5f 43 4f | 44 53 65 73 73 69 6f 6e |def __CO|DSession|
|000002d0| 5f 41 43 5f 5f 0d 23 09 | 69 6e 63 6c 75 64 65 20 |_AC__.#.|include |
|000002e0| 22 43 4f 44 53 65 73 73 | 69 6f 6e 5f 41 43 2e 68 |"CODSess|ion_AC.h|
|000002f0| 22 0d 23 09 65 6e 64 69 | 66 0d 23 65 6e 64 69 66 |".#.endi|f.#endif|
|00000300| 0d 0d 23 69 66 20 71 47 | 72 61 79 73 63 61 6c 65 |..#if qG|rayscale|
|00000310| 41 70 70 65 61 72 61 6e | 63 65 0d 23 09 69 66 6e |Appearan|ce.#.ifn|
|00000320| 64 65 66 20 5f 5f 41 47 | 41 49 6d 61 67 69 6e 67 |def __AG|AImaging|
|00000330| 5f 41 43 5f 5f 0d 23 09 | 69 6e 63 6c 75 64 65 20 |_AC__.#.|include |
|00000340| 22 41 47 41 49 6d 61 67 | 69 6e 67 5f 41 43 2e 68 |"AGAImag|ing_AC.h|
|00000350| 22 0d 23 09 65 6e 64 69 | 66 0d 23 65 6e 64 69 66 |".#.endi|f.#endif|
|00000360| 0d 0d 2f 2f 20 4d 61 63 | 41 70 70 0d 0d 23 69 66 |..// Mac|App..#if|
|00000370| 6e 64 65 66 20 5f 5f 55 | 44 45 42 55 47 5f 5f 0d |ndef __U|DEBUG__.|
|00000380| 23 69 6e 63 6c 75 64 65 | 20 22 55 44 65 62 75 67 |#include| "UDebug|
|00000390| 2e 68 22 0d 23 65 6e 64 | 69 66 0d 0d 23 69 66 6e |.h".#end|if..#ifn|
|000003a0| 64 65 66 20 5f 5f 55 53 | 45 43 54 49 4f 4e 4d 47 |def __US|ECTIONMG|
|000003b0| 52 5f 5f 0d 23 69 6e 63 | 6c 75 64 65 20 22 55 53 |R__.#inc|lude "US|
|000003c0| 65 63 74 69 6f 6e 4d 67 | 72 2e 68 22 0d 23 65 6e |ectionMg|r.h".#en|
|000003d0| 64 69 66 0d 0d 23 69 66 | 6e 64 65 66 20 5f 5f 55 |dif..#if|ndef __U|
|000003e0| 56 49 45 57 53 45 52 56 | 45 52 5f 5f 0d 23 69 6e |VIEWSERV|ER__.#in|
|000003f0| 63 6c 75 64 65 20 22 55 | 56 69 65 77 53 65 72 76 |clude "U|ViewServ|
|00000400| 65 72 2e 68 22 0d 23 65 | 6e 64 69 66 0d 0d 23 69 |er.h".#e|ndif..#i|
|00000410| 66 6e 64 65 66 20 5f 5f | 55 57 49 4e 44 4f 57 4d |fndef __|UWINDOWM|
|00000420| 45 4e 55 42 45 48 41 56 | 49 4f 52 5f 5f 0d 23 69 |ENUBEHAV|IOR__.#i|
|00000430| 6e 63 6c 75 64 65 20 22 | 55 57 69 6e 64 6f 77 4d |nclude "|UWindowM|
|00000440| 65 6e 75 42 65 68 61 76 | 69 6f 72 2e 68 22 0d 23 |enuBehav|ior.h".#|
|00000450| 65 6e 64 69 66 0d 0d 2f | 2f 20 54 6f 6f 6c 62 6f |endif../|/ Toolbo|
|00000460| 78 0d 0d 23 69 66 6e 64 | 65 66 20 5f 5f 45 52 52 |x..#ifnd|ef __ERR|
|00000470| 4f 52 53 5f 5f 0d 23 69 | 6e 63 6c 75 64 65 20 3c |ORS__.#i|nclude <|
|00000480| 45 72 72 6f 72 73 2e 68 | 3e 0d 23 65 6e 64 69 66 |Errors.h|>.#endif|
|00000490| 0d 0d 23 69 66 6e 64 65 | 66 20 5f 5f 51 55 49 43 |..#ifnde|f __QUIC|
|000004a0| 4b 44 52 41 57 5f 5f 0d | 23 69 6e 63 6c 75 64 65 |KDRAW__.|#include|
|000004b0| 20 3c 51 75 69 63 6b 64 | 72 61 77 2e 68 3e 0d 23 | <Quickd|raw.h>.#|
|000004c0| 65 6e 64 69 66 0d 0d 23 | 69 66 6e 64 65 66 20 5f |endif..#|ifndef _|
|000004d0| 5f 52 45 53 4f 55 52 43 | 45 53 5f 5f 0d 23 69 6e |_RESOURC|ES__.#in|
|000004e0| 63 6c 75 64 65 20 3c 52 | 65 73 6f 75 72 63 65 73 |clude <R|esources|
|000004f0| 2e 68 3e 0d 23 65 6e 64 | 69 66 0d 0d 2f 2f 20 41 |.h>.#end|if..// A|
|00000500| 4e 53 49 0d 0d 0d 23 69 | 66 6e 64 65 66 20 5f 5f |NSI...#i|fndef __|
|00000510| 53 54 44 4c 49 42 5f 5f | 0d 23 69 6e 63 6c 75 64 |STDLIB__|.#includ|
|00000520| 65 20 3c 73 74 64 6c 69 | 62 2e 68 3e 0d 23 65 6e |e <stdli|b.h>.#en|
|00000530| 64 69 66 0d 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |dif..//-|--------|
|00000540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000570| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000580| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00000590| 2f 2f 20 47 6c 6f 62 61 | 6c 20 76 61 72 69 61 62 |// Globa|l variab|
|000005a0| 6c 65 20 64 65 66 69 6e | 69 74 69 6f 6e 73 2e 0d |le defin|itions..|
|000005b0| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000600| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 56 61 6c 75 65 |--------|--.Value|
|00000610| 46 6f 72 6d 61 74 09 09 | 67 47 65 6e 65 72 61 6c |Format..|gGeneral|
|00000620| 46 6f 72 6d 61 74 3b 09 | 09 09 09 2f 2f 20 53 41 |Format;.|...// SA|
|00000630| 4e 45 20 63 6f 6e 76 65 | 72 73 69 6f 6e 20 66 6f |NE conve|rsion fo|
|00000640| 72 6d 61 74 73 20 0d 56 | 61 6c 75 65 46 6f 72 6d |rmats .V|alueForm|
|00000650| 61 74 09 09 67 44 65 63 | 69 6d 61 6c 46 6f 72 6d |at..gDec|imalForm|
|00000660| 61 74 3b 0d 56 61 6c 75 | 65 46 6f 72 6d 61 74 09 |at;.Valu|eFormat.|
|00000670| 09 67 4e 6f 44 65 63 69 | 6d 61 6c 46 6f 72 6d 61 |.gNoDeci|malForma|
|00000680| 74 3b 0d 56 61 6c 75 65 | 46 6f 72 6d 61 74 09 09 |t;.Value|Format..|
|00000690| 67 53 63 69 65 6e 74 69 | 66 69 63 46 6f 72 6d 61 |gScienti|ficForma|
|000006a0| 74 3b 0d 56 61 6c 75 65 | 46 6f 72 6d 61 74 09 09 |t;.Value|Format..|
|000006b0| 67 4e 6f 46 6f 72 6d 61 | 74 3b 0d 46 6f 72 6d 61 |gNoForma|t;.Forma|
|000006c0| 74 52 65 63 6f 72 64 09 | 67 44 65 66 61 75 6c 74 |tRecord.|gDefault|
|000006d0| 46 6f 72 6d 61 74 3b 09 | 09 09 09 2f 2f 20 64 65 |Format;.|...// de|
|000006e0| 66 61 75 6c 74 20 63 65 | 6c 6c 20 66 6f 72 6d 61 |fault ce|ll forma|
|000006f0| 74 20 0d 0d 50 61 74 74 | 65 72 6e 09 09 09 67 43 |t ..Patt|ern...gC|
|00000700| 6f 6c 75 6d 6e 53 65 70 | 61 72 61 74 6f 72 50 61 |olumnSep|aratorPa|
|00000710| 74 74 65 72 6e 3b 09 2f | 2f 20 70 61 74 74 65 72 |ttern;./|/ patter|
|00000720| 6e 73 20 66 6f 72 20 73 | 65 70 61 72 61 74 6f 72 |ns for s|eparator|
|00000730| 20 6c 69 6e 65 73 20 0d | 50 61 74 74 65 72 6e 09 | lines .|Pattern.|
|00000740| 09 09 67 52 6f 77 53 65 | 70 61 72 61 74 6f 72 50 |..gRowSe|paratorP|
|00000750| 61 74 74 65 72 6e 3b 0d | 0d 0d 2f 2f 2d 2d 2d 2d |attern;.|..//----|
|00000760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007b0| 2d 2d 2d 2d 0d 2f 2f 20 | 52 65 61 64 43 65 6c 6c |----.// |ReadCell|
|000007c0| 43 6f 6f 72 64 69 6e 61 | 74 65 3a 20 0d 2f 2f 2d |Coordina|te: .//-|
|000007d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000007f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000820| 2d 2d 2d 2d 2d 2d 2d 0d | 47 72 69 64 43 65 6c 6c |-------.|GridCell|
|00000830| 20 52 65 61 64 43 65 6c | 6c 43 6f 6f 72 64 69 6e | ReadCel|lCoordin|
|00000840| 61 74 65 28 54 46 69 6c | 65 2a 20 61 46 69 6c 65 |ate(TFil|e* aFile|
|00000850| 29 0d 7b 0d 09 2f 2f 20 | 52 65 61 64 73 20 61 20 |).{..// |Reads a |
|00000860| 63 65 6c 6c 20 63 6f 6f | 72 64 69 6e 61 74 65 20 |cell coo|rdinate |
|00000870| 66 72 6f 6d 20 61 20 66 | 69 6c 65 0d 09 47 72 69 |from a f|ile..Gri|
|00000880| 64 43 65 6c 6c 20 63 65 | 6c 6c 43 6f 6f 72 64 69 |dCell ce|llCoordi|
|00000890| 6e 61 74 65 3b 0d 09 6c | 6f 6e 67 20 63 6f 75 6e |nate;..l|ong coun|
|000008a0| 74 20 3d 20 73 69 7a 65 | 6f 66 28 47 72 69 64 43 |t = size|of(GridC|
|000008b0| 65 6c 6c 29 3b 0d 09 3a | 3a 54 68 72 6f 77 49 66 |ell);..:|:ThrowIf|
|000008c0| 4f 53 45 72 72 5f 41 43 | 28 61 46 69 6c 65 2d 3e |OSErr_AC|(aFile->|
|000008d0| 52 65 61 64 44 61 74 61 | 28 26 63 65 6c 6c 43 6f |ReadData|(&cellCo|
|000008e0| 6f 72 64 69 6e 61 74 65 | 2c 20 63 6f 75 6e 74 29 |ordinate|, count)|
|000008f0| 29 3b 0d 09 0d 09 72 65 | 74 75 72 6e 20 63 65 6c |);....re|turn cel|
|00000900| 6c 43 6f 6f 72 64 69 6e | 61 74 65 3b 0d 7d 0d 0d |lCoordin|ate;.}..|
|00000910| 0d 2f 2f 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |.//=====|========|
|00000920| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000930| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000940| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000950| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00000960| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 0d 2f 2f 20 43 |========|===.// C|
|00000970| 4c 41 53 53 20 54 43 61 | 6c 63 41 70 70 6c 69 63 |LASS TCa|lcApplic|
|00000980| 61 74 69 6f 6e 0d 2f 2f | 3d 3d 3d 3d 3d 3d 3d 3d |ation.//|========|
|00000990| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000009a0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000009b0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000009c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000009d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000009e0| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|000009f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 20 54 |--------|---.// T|
|00000a40| 43 61 6c 63 41 70 70 6c | 69 63 61 74 69 6f 6e 20 |CalcAppl|ication |
|00000a50| 63 6f 6e 73 74 72 75 63 | 74 6f 72 20 0d 2f 2f 2d |construc|tor .//-|
|00000a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ab0| 2d 2d 2d 2d 2d 2d 2d 0d | 54 43 61 6c 63 41 70 70 |-------.|TCalcApp|
|00000ac0| 6c 69 63 61 74 69 6f 6e | 3a 3a 54 43 61 6c 63 41 |lication|::TCalcA|
|00000ad0| 70 70 6c 69 63 61 74 69 | 6f 6e 28 29 20 3a 0d 09 |pplicati|on() :..|
|00000ae0| 54 41 70 70 6c 69 63 61 | 74 69 6f 6e 28 6b 46 69 |TApplica|tion(kFi|
|00000af0| 6c 65 54 79 70 65 2c 20 | 6b 53 69 67 6e 61 74 75 |leType, |kSignatu|
|00000b00| 72 65 29 0d 7b 0d 09 67 | 47 65 6e 65 72 61 6c 46 |re).{..g|GeneralF|
|00000b10| 6f 72 6d 61 74 2e 73 74 | 79 6c 65 20 3d 20 46 4c |ormat.st|yle = FL|
|00000b20| 4f 41 54 44 45 43 49 4d | 41 4c 3b 0d 09 67 47 65 |OATDECIM|AL;..gGe|
|00000b30| 6e 65 72 61 6c 46 6f 72 | 6d 61 74 2e 64 69 67 69 |neralFor|mat.digi|
|00000b40| 74 73 20 3d 20 6b 56 61 | 6c 75 65 50 72 65 63 69 |ts = kVa|luePreci|
|00000b50| 73 69 6f 6e 3b 0d 0d 09 | 67 44 65 63 69 6d 61 6c |sion;...|gDecimal|
|00000b60| 46 6f 72 6d 61 74 2e 73 | 74 79 6c 65 20 3d 20 46 |Format.s|tyle = F|
|00000b70| 49 58 45 44 44 45 43 49 | 4d 41 4c 3b 0d 09 67 44 |IXEDDECI|MAL;..gD|
|00000b80| 65 63 69 6d 61 6c 46 6f | 72 6d 61 74 2e 64 69 67 |ecimalFo|rmat.dig|
|00000b90| 69 74 73 20 3d 20 32 3b | 0d 0d 09 67 4e 6f 44 65 |its = 2;|...gNoDe|
|00000ba0| 63 69 6d 61 6c 46 6f 72 | 6d 61 74 2e 73 74 79 6c |cimalFor|mat.styl|
|00000bb0| 65 20 3d 20 46 49 58 45 | 44 44 45 43 49 4d 41 4c |e = FIXE|DDECIMAL|
|00000bc0| 3b 0d 09 67 4e 6f 44 65 | 63 69 6d 61 6c 46 6f 72 |;..gNoDe|cimalFor|
|00000bd0| 6d 61 74 2e 64 69 67 69 | 74 73 20 3d 20 30 3b 0d |mat.digi|ts = 0;.|
|00000be0| 0d 09 67 53 63 69 65 6e | 74 69 66 69 63 46 6f 72 |..gScien|tificFor|
|00000bf0| 6d 61 74 2e 73 74 79 6c | 65 20 3d 20 46 4c 4f 41 |mat.styl|e = FLOA|
|00000c00| 54 44 45 43 49 4d 41 4c | 3b 0d 09 67 53 63 69 65 |TDECIMAL|;..gScie|
|00000c10| 6e 74 69 66 69 63 46 6f | 72 6d 61 74 2e 64 69 67 |ntificFo|rmat.dig|
|00000c20| 69 74 73 20 3d 20 32 3b | 0d 0d 09 67 4e 6f 46 6f |its = 2;|...gNoFo|
|00000c30| 72 6d 61 74 2e 73 74 79 | 6c 65 20 3d 20 46 49 58 |rmat.sty|le = FIX|
|00000c40| 45 44 44 45 43 49 4d 41 | 4c 3b 0d 09 67 4e 6f 46 |EDDECIMA|L;..gNoF|
|00000c50| 6f 72 6d 61 74 2e 64 69 | 67 69 74 73 20 3d 20 2d |ormat.di|gits = -|
|00000c60| 31 3b 0d 0d 09 67 44 65 | 66 61 75 6c 74 46 6f 72 |1;...gDe|faultFor|
|00000c70| 6d 61 74 2e 66 4a 75 73 | 74 69 66 69 63 61 74 69 |mat.fJus|tificati|
|00000c80| 6f 6e 20 3d 20 6b 44 65 | 66 61 75 6c 74 4a 75 73 |on = kDe|faultJus|
|00000c90| 74 69 66 69 63 61 74 69 | 6f 6e 3b 0d 09 67 44 65 |tificati|on;..gDe|
|00000ca0| 66 61 75 6c 74 46 6f 72 | 6d 61 74 2e 66 53 74 79 |faultFor|mat.fSty|
|00000cb0| 6c 65 20 3d 20 6b 47 65 | 6e 65 72 61 6c 3b 0d 09 |le = kGe|neral;..|
|00000cc0| 67 44 65 66 61 75 6c 74 | 46 6f 72 6d 61 74 2e 66 |gDefault|Format.f|
|00000cd0| 44 69 67 69 74 73 20 3d | 20 30 3b 0d 09 67 44 65 |Digits =| 0;..gDe|
|00000ce0| 66 61 75 6c 74 46 6f 72 | 6d 61 74 2e 66 46 6f 6e |faultFor|mat.fFon|
|00000cf0| 74 4e 75 6d 62 65 72 20 | 3d 20 6b 43 65 6c 6c 46 |tNumber |= kCellF|
|00000d00| 6f 6e 74 3b 0d 09 67 44 | 65 66 61 75 6c 74 46 6f |ont;..gD|efaultFo|
|00000d10| 72 6d 61 74 2e 66 46 6f | 6e 74 53 69 7a 65 20 3d |rmat.fFo|ntSize =|
|00000d20| 20 6b 43 65 6c 6c 46 6f | 6e 74 53 69 7a 65 3b 0d | kCellFo|ntSize;.|
|00000d30| 09 67 44 65 66 61 75 6c | 74 46 6f 72 6d 61 74 2e |.gDefaul|tFormat.|
|00000d40| 66 46 6f 6e 74 53 74 79 | 6c 65 20 3d 20 30 3b 0d |fFontSty|le = 0;.|
|00000d50| 0d 09 67 43 6f 6c 75 6d | 6e 53 65 70 61 72 61 74 |..gColum|nSeparat|
|00000d60| 6f 72 50 61 74 74 65 72 | 6e 20 3d 20 71 64 2e 67 |orPatter|n = qd.g|
|00000d70| 72 61 79 3b 0d 09 67 52 | 6f 77 53 65 70 61 72 61 |ray;..gR|owSepara|
|00000d80| 74 6f 72 50 61 74 74 65 | 72 6e 20 3d 20 71 64 2e |torPatte|rn = qd.|
|00000d90| 67 72 61 79 3b 20 0d 0d | 09 2f 2f 20 53 75 70 70 |gray; ..|.// Supp|
|00000da0| 72 65 73 73 20 4c 69 6e | 6b 65 72 20 64 65 61 64 |ress Lin|ker dead|
|00000db0| 2d 73 74 72 69 70 70 69 | 6e 67 20 6f 66 20 74 68 |-strippi|ng of th|
|00000dc0| 65 73 65 20 63 6c 61 73 | 73 65 73 20 0d 09 52 45 |ese clas|ses ..RE|
|00000dd0| 47 49 53 54 45 52 5f 43 | 4c 41 53 53 5f 41 43 28 |GISTER_C|LASS_AC(|
|00000de0| 54 43 61 6c 63 57 69 6e | 64 6f 77 29 3b 0d 09 52 |TCalcWin|dow);..R|
|00000df0| 45 47 49 53 54 45 52 5f | 43 4c 41 53 53 5f 41 43 |EGISTER_|CLASS_AC|
|00000e00| 28 54 43 65 6c 6c 73 56 | 69 65 77 29 3b 0d 09 52 |(TCellsV|iew);..R|
|00000e10| 45 47 49 53 54 45 52 5f | 43 4c 41 53 53 5f 41 43 |EGISTER_|CLASS_AC|
|00000e20| 28 54 52 6f 77 73 56 69 | 65 77 29 3b 0d 09 52 45 |(TRowsVi|ew);..RE|
|00000e30| 47 49 53 54 45 52 5f 43 | 4c 41 53 53 5f 41 43 28 |GISTER_C|LASS_AC(|
|00000e40| 54 43 6f 6c 75 6d 6e 73 | 56 69 65 77 29 3b 0d 09 |TColumns|View);..|
|00000e50| 52 45 47 49 53 54 45 52 | 5f 43 4c 41 53 53 5f 41 |REGISTER|_CLASS_A|
|00000e60| 43 28 54 45 6e 74 72 79 | 56 69 65 77 29 3b 0d 09 |C(TEntry|View);..|
|00000e70| 52 45 47 49 53 54 45 52 | 5f 43 4c 41 53 53 5f 41 |REGISTER|_CLASS_A|
|00000e80| 43 28 54 43 6f 6f 72 64 | 56 69 65 77 29 3b 0d 09 |C(TCoord|View);..|
|00000e90| 52 45 47 49 53 54 45 52 | 5f 43 4c 41 53 53 5f 41 |REGISTER|_CLASS_A|
|00000ea0| 43 28 54 50 72 69 6d 61 | 72 79 53 63 72 6f 6c 6c |C(TPrima|ryScroll|
|00000eb0| 65 72 29 3b 0d 09 52 45 | 47 49 53 54 45 52 5f 43 |er);..RE|GISTER_C|
|00000ec0| 4c 41 53 53 5f 41 43 28 | 54 47 72 69 64 56 69 65 |LASS_AC(|TGridVie|
|00000ed0| 77 44 65 73 69 67 6e 61 | 74 6f 72 29 3b 0d 09 52 |wDesigna|tor);..R|
|00000ee0| 45 47 49 53 54 45 52 5f | 43 4c 41 53 53 5f 41 43 |EGISTER_|CLASS_AC|
|00000ef0| 28 54 53 65 63 6f 6e 64 | 61 72 79 53 63 72 6f 6c |(TSecond|aryScrol|
|00000f00| 6c 65 72 29 3b 0d 0d 23 | 69 66 20 71 41 4c 4f 45 |ler);..#|if qALOE|
|00000f10| 0d 09 49 6e 69 74 55 4f | 44 47 72 61 70 68 56 69 |..InitUO|DGraphVi|
|00000f20| 65 77 28 29 3b 0d 23 65 | 6e 64 69 66 0d 0d 09 41 |ew();.#e|ndif...A|
|00000f30| 64 64 42 65 68 61 76 69 | 6f 72 28 54 48 5f 6e 65 |ddBehavi|or(TH_ne|
|00000f40| 77 20 54 57 69 6e 64 6f | 77 4d 65 6e 75 42 65 68 |w TWindo|wMenuBeh|
|00000f50| 61 76 69 6f 72 28 6b 4e | 6f 49 64 65 6e 74 69 66 |avior(kN|oIdentif|
|00000f60| 69 65 72 2c 20 6d 57 69 | 6e 64 6f 77 4d 65 6e 75 |ier, mWi|ndowMenu|
|00000f70| 2c 20 6d 49 6e 76 61 6c | 69 64 61 74 65 57 69 6e |, mInval|idateWin|
|00000f80| 64 6f 77 4d 65 6e 75 2c | 20 66 61 6c 73 65 2c 20 |dowMenu,| false, |
|00000f90| 66 61 6c 73 65 2c 20 66 | 61 6c 73 65 29 29 3b 0d |false, f|alse));.|
|00000fa0| 7d 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..//---|--------|
|00000fb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000fc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000fd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000fe0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ff0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2f 2f |--------|-----.//|
|00001000| 20 54 43 61 6c 63 41 70 | 70 6c 69 63 61 74 69 6f | TCalcAp|plicatio|
|00001010| 6e 20 64 65 73 74 72 75 | 63 74 6f 72 0d 2f 2f 2d |n destru|ctor.//-|
|00001020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001070| 2d 2d 2d 2d 2d 2d 2d 0d | 54 43 61 6c 63 41 70 70 |-------.|TCalcApp|
|00001080| 6c 69 63 61 74 69 6f 6e | 3a 3a 7e 54 43 61 6c 63 |lication|::~TCalc|
|00001090| 41 70 70 6c 69 63 61 74 | 69 6f 6e 28 29 0d 7b 0d |Applicat|ion().{.|
|000010a0| 7d 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..//---|--------|
|000010b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2f 2f |--------|-----.//|
|00001100| 20 54 43 61 6c 63 41 70 | 70 6c 69 63 61 74 69 6f | TCalcAp|plicatio|
|00001110| 6e 3a 3a 41 62 6f 75 74 | 54 6f 4c 6f 73 65 43 6f |n::About|ToLoseCo|
|00001120| 6e 74 72 6f 6c 3a 20 52 | 65 6d 6f 76 65 20 45 64 |ntrol: R|emove Ed|
|00001130| 69 74 20 6d 65 6e 75 20 | 62 75 7a 7a 77 6f 72 64 |it menu |buzzword|
|00001140| 73 20 66 6f 72 20 69 6e | 63 6f 6d 69 6e 67 20 44 |s for in|coming D|
|00001150| 65 73 6b 0d 2f 2f 20 41 | 63 63 65 73 73 6f 72 79 |esk.// A|ccessory|
|00001160| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|00001170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 76 6f 69 64 |--------|---.void|
|000011c0| 20 54 43 61 6c 63 41 70 | 70 6c 69 63 61 74 69 6f | TCalcAp|plicatio|
|000011d0| 6e 3a 3a 41 62 6f 75 74 | 54 6f 4c 6f 73 65 43 6f |n::About|ToLoseCo|
|000011e0| 6e 74 72 6f 6c 28 62 6f | 6f 6c 20 63 6f 6e 76 65 |ntrol(bo|ol conve|
|000011f0| 72 74 43 6c 69 70 62 6f | 61 72 64 29 2f 2f 20 6f |rtClipbo|ard)// o|
|00001200| 76 65 72 72 69 64 65 20 | 0d 7b 0d 09 53 65 74 45 |verride |.{..SetE|
|00001210| 64 69 74 43 6f 6d 6d 61 | 6e 64 4e 61 6d 65 28 63 |ditComma|ndName(c|
|00001220| 43 75 74 2c 20 63 53 74 | 61 6e 64 61 72 64 43 75 |Cut, cSt|andardCu|
|00001230| 74 29 3b 0d 09 53 65 74 | 45 64 69 74 43 6f 6d 6d |t);..Set|EditComm|
|00001240| 61 6e 64 4e 61 6d 65 28 | 63 43 6f 70 79 2c 20 63 |andName(|cCopy, c|
|00001250| 53 74 61 6e 64 61 72 64 | 43 6f 70 79 29 3b 0d 09 |Standard|Copy);..|
|00001260| 53 65 74 45 64 69 74 43 | 6f 6d 6d 61 6e 64 4e 61 |SetEditC|ommandNa|
|00001270| 6d 65 28 63 43 6c 65 61 | 72 2c 20 63 53 74 61 6e |me(cClea|r, cStan|
|00001280| 64 61 72 64 43 6c 65 61 | 72 29 3b 0d 0d 09 54 41 |dardClea|r);...TA|
|00001290| 70 70 6c 69 63 61 74 69 | 6f 6e 3a 3a 41 62 6f 75 |pplicati|on::Abou|
|000012a0| 74 54 6f 4c 6f 73 65 43 | 6f 6e 74 72 6f 6c 28 63 |tToLoseC|ontrol(c|
|000012b0| 6f 6e 76 65 72 74 43 6c | 69 70 62 6f 61 72 64 29 |onvertCl|ipboard)|
|000012c0| 3b 0d 7d 0d 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;.}..//-|--------|
|000012d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000012f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001310| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00001320| 2f 2f 20 54 43 61 6c 63 | 41 70 70 6c 69 63 61 74 |// TCalc|Applicat|
|00001330| 69 6f 6e 3a 3a 44 6f 4d | 61 6b 65 44 6f 63 75 6d |ion::DoM|akeDocum|
|00001340| 65 6e 74 3a 20 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |ent: .//|--------|
|00001350| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001360| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001370| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001380| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000013a0| 0d 54 44 6f 63 75 6d 65 | 6e 74 2a 20 54 43 61 6c |.TDocume|nt* TCal|
|000013b0| 63 41 70 70 6c 69 63 61 | 74 69 6f 6e 3a 3a 44 6f |cApplica|tion::Do|
|000013c0| 4d 61 6b 65 44 6f 63 75 | 6d 65 6e 74 28 43 6f 6d |MakeDocu|ment(Com|
|000013d0| 6d 61 6e 64 4e 75 6d 62 | 65 72 20 2f 2a 69 74 73 |mandNumb|er /*its|
|000013e0| 43 6f 6d 6d 61 6e 64 4e | 75 6d 62 65 72 2a 2f 2c |CommandN|umber*/,|
|000013f0| 20 54 46 69 6c 65 2a 20 | 69 74 73 46 69 6c 65 29 | TFile* |itsFile)|
|00001400| 0d 7b 0d 09 72 65 74 75 | 72 6e 20 54 48 5f 6e 65 |.{..retu|rn TH_ne|
|00001410| 77 20 54 43 61 6c 63 44 | 6f 63 75 6d 65 6e 74 28 |w TCalcD|ocument(|
|00001420| 69 74 73 46 69 6c 65 2c | 20 43 52 65 63 74 5f 41 |itsFile,| CRect_A|
|00001430| 43 28 31 2c 20 31 2c 20 | 6b 4d 61 78 43 6f 6c 75 |C(1, 1, |kMaxColu|
|00001440| 6d 6e 73 2c 20 6b 4d 61 | 78 52 6f 77 73 29 29 3b |mns, kMa|xRows));|
|00001450| 0d 7d 0d 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.}..//--|--------|
|00001460| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001470| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000014a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2f |--------|------./|
|000014b0| 2f 20 54 43 61 6c 63 41 | 70 70 6c 69 63 61 74 69 |/ TCalcA|pplicati|
|000014c0| 6f 6e 3a 3a 4d 61 6b 65 | 56 69 65 77 46 6f 72 41 |on::Make|ViewForA|
|000014d0| 6c 69 65 6e 43 6c 69 70 | 62 6f 61 72 64 3a 20 4c |lienClip|board: L|
|000014e0| 61 75 6e 63 68 20 61 20 | 76 69 65 77 20 74 6f 20 |aunch a |view to |
|000014f0| 72 65 70 72 65 73 65 6e | 74 20 74 68 65 20 64 61 |represen|t the da|
|00001500| 74 61 20 66 6f 75 6e 64 | 0d 2f 2f 20 69 6e 20 74 |ta found|.// in t|
|00001510| 68 65 20 43 6c 69 70 62 | 6f 61 72 64 20 61 74 20 |he Clipb|oard at |
|00001520| 61 70 70 6c 69 63 61 74 | 69 6f 6e 20 73 74 61 72 |applicat|ion star|
|00001530| 74 2d 75 70 20 74 69 6d | 65 2c 20 6f 72 20 77 68 |t-up tim|e, or wh|
|00001540| 65 6e 20 72 65 74 75 72 | 6e 69 6e 67 20 66 72 6f |en retur|ning fro|
|00001550| 6d 20 61 6e 20 65 78 63 | 75 72 73 69 6f 6e 20 74 |m an exc|ursion t|
|00001560| 6f 0d 2f 2f 20 4d 75 6c | 74 69 46 69 6e 64 65 72 |o.// Mul|tiFinder|
|00001570| 2c 20 6f 72 20 77 68 65 | 6e 20 72 65 74 75 72 6e |, or whe|n return|
|00001580| 69 6e 67 20 66 72 6f 6d | 20 61 20 44 65 73 6b 20 |ing from| a Desk |
|00001590| 41 63 63 65 73 73 6f 72 | 79 2e 20 54 68 69 73 20 |Accessor|y. This |
|000015a0| 63 72 65 61 74 65 73 20 | 61 20 63 6c 69 70 62 6f |creates |a clipbo|
|000015b0| 61 72 64 20 66 6f 72 0d | 2f 2f 20 27 43 41 4c 43 |ard for.|// 'CALC|
|000015c0| 27 20 73 63 72 61 70 2e | 0d 2f 2f 2d 2d 2d 2d 2d |' scrap.|.//-----|
|000015d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001600| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001610| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001620| 2d 2d 2d 0d 54 56 69 65 | 77 2a 20 54 43 61 6c 63 |---.TVie|w* TCalc|
|00001630| 41 70 70 6c 69 63 61 74 | 69 6f 6e 3a 3a 4d 61 6b |Applicat|ion::Mak|
|00001640| 65 56 69 65 77 46 6f 72 | 41 6c 69 65 6e 43 6c 69 |eViewFor|AlienCli|
|00001650| 70 62 6f 61 72 64 28 29 | 2f 2f 20 6f 76 65 72 72 |pboard()|// overr|
|00001660| 69 64 65 20 0d 7b 0d 09 | 54 56 69 65 77 2a 20 72 |ide .{..|TView* r|
|00001670| 65 74 75 72 6e 56 61 6c | 20 3d 20 4e 55 4c 4c 3b |eturnVal| = NULL;|
|00001680| 0d 09 6c 6f 6e 67 20 73 | 63 72 61 70 4f 66 66 73 |..long s|crapOffs|
|00001690| 65 74 3b 0d 09 54 43 61 | 6c 63 44 6f 63 75 6d 65 |et;..TCa|lcDocume|
|000016a0| 6e 74 20 2a 20 63 6c 69 | 70 44 6f 63 75 6d 65 6e |nt * cli|pDocumen|
|000016b0| 74 3b 0d 09 54 43 65 6c | 6c 73 56 69 65 77 20 2a |t;..TCel|lsView *|
|000016c0| 20 63 6c 69 70 56 69 65 | 77 3b 0d 09 53 63 72 61 | clipVie|w;..Scra|
|000016d0| 70 49 6e 66 6f 52 65 63 | 6f 72 64 20 73 63 72 61 |pInfoRec|ord scra|
|000016e0| 70 49 6e 66 6f 3b 0d 09 | 47 72 69 64 43 6f 6f 72 |pInfo;..|GridCoor|
|000016f0| 64 69 6e 61 74 65 20 72 | 3b 0d 09 47 72 69 64 43 |dinate r|;..GridC|
|00001700| 6f 6f 72 64 69 6e 61 74 | 65 20 63 3b 0d 09 73 68 |oordinat|e c;..sh|
|00001710| 6f 72 74 20 69 3b 0d 09 | 47 72 69 64 43 6f 6f 72 |ort i;..|GridCoor|
|00001720| 64 69 6e 61 74 65 20 63 | 65 6c 6c 73 52 65 61 64 |dinate c|ellsRead|
|00001730| 3b 0d 09 47 72 69 64 43 | 65 6c 6c 20 63 65 6c 6c |;..GridC|ell cell|
|00001740| 43 6f 6f 72 64 3b 0d 09 | 6c 6f 6e 67 20 6f 66 66 |Coord;..|long off|
|00001750| 73 65 74 3b 0d 09 54 52 | 6f 77 20 2a 20 61 52 6f |set;..TR|ow * aRo|
|00001760| 77 3b 0d 09 54 43 6f 6c | 75 6d 6e 20 2a 20 61 43 |w;..TCol|umn * aC|
|00001770| 6f 6c 75 6d 6e 3b 0d 09 | 54 43 65 6c 6c 20 2a 20 |olumn;..|TCell * |
|00001780| 61 43 65 6c 6c 3b 0d 09 | 62 6f 6f 6c 20 70 65 72 |aCell;..|bool per|
|00001790| 6d 3b 0d 0d 09 2f 2f 20 | 42 65 66 6f 72 65 20 64 |m;...// |Before d|
|000017a0| 6f 69 6e 67 20 61 6e 79 | 74 68 69 6e 67 20 65 6c |oing any|thing el|
|000017b0| 73 65 2c 20 6d 61 6b 65 | 20 73 75 72 65 20 74 68 |se, make| sure th|
|000017c0| 65 20 73 63 72 61 70 20 | 63 6f 6e 74 61 69 6e 73 |e scrap |contains|
|000017d0| 20 6d 79 20 74 79 70 65 | 20 0d 09 69 66 20 28 47 | my type| ..if (G|
|000017e0| 65 74 53 63 72 61 70 28 | 4e 55 4c 4c 2c 20 6b 43 |etScrap(|NULL, kC|
|000017f0| 61 6c 63 53 63 72 61 70 | 54 79 70 65 2c 20 26 6f |alcScrap|Type, &o|
|00001800| 66 66 73 65 74 29 20 3e | 20 30 29 0d 09 7b 0d 09 |ffset) >| 0)..{..|
|00001810| 09 63 6c 69 70 44 6f 63 | 75 6d 65 6e 74 20 3d 20 |.clipDoc|ument = |
|00001820| 4e 55 4c 4c 3b 09 09 09 | 09 09 2f 2f 20 73 6f 20 |NULL;...|..// so |
|00001830| 66 61 69 6c 75 72 65 20 | 68 61 6e 64 6c 65 72 20 |failure |handler |
|00001840| 6b 6e 6f 77 73 20 74 6f | 20 66 72 65 65 20 69 74 |knows to| free it|
|00001850| 20 0d 0d 09 09 74 72 79 | 0d 09 09 7b 0d 09 09 09 | ....try|...{....|
|00001860| 43 54 65 6d 70 48 61 6e | 64 6c 65 5f 41 43 20 63 |CTempHan|dle_AC c|
|00001870| 61 6c 63 53 63 72 61 70 | 28 4e 65 77 50 65 72 6d |alcScrap|(NewPerm|
|00001880| 48 61 6e 64 6c 65 28 30 | 29 29 3b 0d 0d 09 09 09 |Handle(0|));.....|
|00001890| 70 65 72 6d 20 3d 20 50 | 65 72 6d 41 6c 6c 6f 63 |perm = P|ermAlloc|
|000018a0| 61 74 69 6f 6e 28 74 72 | 75 65 29 3b 0d 09 09 09 |ation(tr|ue);....|
|000018b0| 73 63 72 61 70 4f 66 66 | 73 65 74 20 3d 20 47 65 |scrapOff|set = Ge|
|000018c0| 74 53 63 72 61 70 28 63 | 61 6c 63 53 63 72 61 70 |tScrap(c|alcScrap|
|000018d0| 2c 20 6b 43 61 6c 63 53 | 63 72 61 70 54 79 70 65 |, kCalcS|crapType|
|000018e0| 2c 20 26 6f 66 66 73 65 | 74 29 3b 0d 09 09 09 70 |, &offse|t);....p|
|000018f0| 65 72 6d 20 3d 20 50 65 | 72 6d 41 6c 6c 6f 63 61 |erm = Pe|rmAlloca|
|00001900| 74 69 6f 6e 28 70 65 72 | 6d 29 3b 0d 0d 09 09 09 |tion(per|m);.....|
|00001910| 2f 2f 20 4f 6e 6c 79 20 | 61 20 6e 65 67 61 74 69 |// Only |a negati|
|00001920| 76 65 20 72 65 73 75 6c | 74 20 69 6e 64 69 63 61 |ve resul|t indica|
|00001930| 74 65 73 20 61 6e 20 65 | 72 72 6f 72 2d 2d 3a 3a |tes an e|rror--::|
|00001940| 54 68 72 6f 77 49 66 4f | 53 45 72 72 5f 41 43 20 |ThrowIfO|SErr_AC |
|00001950| 63 6f 6e 73 69 64 65 72 | 73 20 61 6e 79 20 6e 6f |consider|s any no|
|00001960| 6e 2d 7a 65 72 6f 20 72 | 65 73 75 6c 74 20 61 6e |n-zero r|esult an|
|00001970| 20 65 72 72 6f 72 2e 20 | 0d 09 09 09 69 66 20 28 | error. |....if (|
|00001980| 73 63 72 61 70 4f 66 66 | 73 65 74 20 3c 20 30 29 |scrapOff|set < 0)|
|00001990| 0d 09 09 09 09 3a 3a 54 | 68 72 6f 77 49 66 4f 53 |.....::T|hrowIfOS|
|000019a0| 45 72 72 5f 41 43 28 73 | 74 61 74 69 63 5f 63 61 |Err_AC(s|tatic_ca|
|000019b0| 73 74 3c 73 68 6f 72 74 | 3e 28 73 63 72 61 70 4f |st<short|>(scrapO|
|000019c0| 66 66 73 65 74 29 29 3b | 0d 09 09 09 73 63 72 61 |ffset));|....scra|
|000019d0| 70 4f 66 66 73 65 74 20 | 3d 20 30 3b 0d 0d 09 09 |pOffset |= 0;....|
|000019e0| 09 52 65 61 64 53 63 72 | 61 70 28 63 61 6c 63 53 |.ReadScr|ap(calcS|
|000019f0| 63 72 61 70 2c 20 73 63 | 72 61 70 4f 66 66 73 65 |crap, sc|rapOffse|
|00001a00| 74 2c 20 72 65 69 6e 74 | 65 72 70 72 65 74 5f 63 |t, reint|erpret_c|
|00001a10| 61 73 74 3c 75 6e 73 69 | 67 6e 65 64 20 63 68 61 |ast<unsi|gned cha|
|00001a20| 72 2a 3e 28 26 73 63 72 | 61 70 49 6e 66 6f 29 2c |r*>(&scr|apInfo),|
|00001a30| 20 73 69 7a 65 6f 66 28 | 73 63 72 61 70 49 6e 66 | sizeof(|scrapInf|
|00001a40| 6f 29 29 3b 0d 09 09 09 | 3a 3a 54 68 72 6f 77 49 |o));....|::ThrowI|
|00001a50| 66 4d 65 6d 45 72 72 6f | 72 5f 41 43 28 29 3b 0d |fMemErro|r_AC();.|
|00001a60| 09 09 09 63 6c 69 70 44 | 6f 63 75 6d 65 6e 74 20 |...clipD|ocument |
|00001a70| 3d 20 54 48 5f 6e 65 77 | 20 54 43 61 6c 63 44 6f |= TH_new| TCalcDo|
|00001a80| 63 75 6d 65 6e 74 28 4e | 55 4c 4c 2c 20 73 63 72 |cument(N|ULL, scr|
|00001a90| 61 70 49 6e 66 6f 2e 73 | 65 6c 65 63 74 69 6f 6e |apInfo.s|election|
|00001aa0| 29 3b 0d 09 09 09 63 6c | 69 70 44 6f 63 75 6d 65 |);....cl|ipDocume|
|00001ab0| 6e 74 2d 3e 44 6f 49 6e | 69 74 69 61 6c 53 74 61 |nt->DoIn|itialSta|
|00001ac0| 74 65 28 29 3b 0d 0d 09 | 09 09 2f 2f 20 75 70 64 |te();...|..// upd|
|00001ad0| 61 74 65 20 74 68 65 20 | 75 73 65 72 20 73 65 6c |ate the |user sel|
|00001ae0| 65 63 74 69 6f 6e 20 74 | 6f 20 72 65 70 72 65 73 |ection t|o repres|
|00001af0| 65 6e 74 20 74 68 65 20 | 61 63 74 75 61 6c 20 73 |ent the |actual s|
|00001b00| 65 6c 65 63 74 69 6f 6e | 20 69 6e 20 74 68 65 20 |election| in the |
|00001b10| 73 63 72 61 70 0d 09 09 | 09 54 47 72 69 64 56 69 |scrap...|.TGridVi|
|00001b20| 65 77 44 65 73 69 67 6e | 61 74 6f 72 2a 20 75 73 |ewDesign|ator* us|
|00001b30| 65 72 53 65 6c 65 63 74 | 69 6f 6e 20 3d 20 64 79 |erSelect|ion = dy|
|00001b40| 6e 61 6d 69 63 5f 63 61 | 73 74 5f 41 43 28 54 47 |namic_ca|st_AC(TG|
|00001b50| 72 69 64 56 69 65 77 44 | 65 73 69 67 6e 61 74 6f |ridViewD|esignato|
|00001b60| 72 2a 2c 20 63 6c 69 70 | 44 6f 63 75 6d 65 6e 74 |r*, clip|Document|
|00001b70| 2d 3e 47 65 74 55 73 65 | 72 53 65 6c 65 63 74 69 |->GetUse|rSelecti|
|00001b80| 6f 6e 28 29 29 3b 0d 09 | 09 09 69 66 20 28 75 73 |on());..|..if (us|
|00001b90| 65 72 53 65 6c 65 63 74 | 69 6f 6e 29 0d 09 09 09 |erSelect|ion)....|
|00001ba0| 09 75 73 65 72 53 65 6c | 65 63 74 69 6f 6e 2d 3e |.userSel|ection->|
|00001bb0| 53 65 74 28 73 63 72 61 | 70 49 6e 66 6f 2e 73 65 |Set(scra|pInfo.se|
|00001bc0| 6c 65 63 74 69 6f 6e 29 | 3b 0d 0d 09 09 09 63 6c |lection)|;.....cl|
|00001bd0| 69 70 56 69 65 77 20 3d | 20 4e 55 4c 4c 3b 0d 09 |ipView =| NULL;..|
|00001be0| 09 09 63 6c 69 70 56 69 | 65 77 20 3d 20 54 48 5f |..clipVi|ew = TH_|
|00001bf0| 6e 65 77 20 54 43 65 6c | 6c 73 56 69 65 77 28 74 |new TCel|lsView(t|
|00001c00| 72 75 65 29 3b 0d 09 09 | 09 63 6c 69 70 56 69 65 |rue);...|.clipVie|
|00001c10| 77 2d 3e 48 61 6e 64 6c | 65 50 6f 73 74 43 72 65 |w->Handl|ePostCre|
|00001c20| 61 74 65 28 63 6c 69 70 | 44 6f 63 75 6d 65 6e 74 |ate(clip|Document|
|00001c30| 29 3b 20 2f 2f 53 52 46 | 20 6e 65 77 20 72 65 71 |); //SRF| new req|
|00001c40| 75 69 72 65 6d 65 6e 74 | 0d 09 09 09 63 6c 69 70 |uirement|....clip|
|00001c50| 44 6f 63 75 6d 65 6e 74 | 2d 3e 66 43 65 6c 6c 73 |Document|->fCells|
|00001c60| 56 69 65 77 20 3d 20 63 | 6c 69 70 56 69 65 77 3b |View = c|lipView;|
|00001c70| 0d 0d 09 09 09 66 6f 72 | 20 28 72 20 3d 20 31 3b |.....for| (r = 1;|
|00001c80| 20 72 20 3c 3d 20 28 63 | 6c 69 70 44 6f 63 75 6d | r <= (c|lipDocum|
|00001c90| 65 6e 74 2d 3e 66 4e 6f | 4f 66 52 6f 77 73 29 3b |ent->fNo|OfRows);|
|00001ca0| 20 2b 2b 72 29 0d 09 09 | 09 7b 0d 09 09 09 09 61 | ++r)...|.{.....a|
|00001cb0| 52 6f 77 20 3d 20 54 48 | 5f 6e 65 77 20 54 52 6f |Row = TH|_new TRo|
|00001cc0| 77 28 72 29 3b 0d 09 09 | 09 09 61 52 6f 77 2d 3e |w(r);...|..aRow->|
|00001cd0| 52 65 61 64 46 72 6f 6d | 53 63 72 61 70 28 63 61 |ReadFrom|Scrap(ca|
|00001ce0| 6c 63 53 63 72 61 70 2c | 20 73 63 72 61 70 4f 66 |lcScrap,| scrapOf|
|00001cf0| 66 73 65 74 29 3b 0d 09 | 09 09 09 63 6c 69 70 44 |fset);..|...clipD|
|00001d00| 6f 63 75 6d 65 6e 74 2d | 3e 41 64 64 52 6f 77 28 |ocument-|>AddRow(|
|00001d10| 61 52 6f 77 29 3b 0d 09 | 09 09 7d 0d 0d 09 09 09 |aRow);..|..}.....|
|00001d20| 66 6f 72 20 28 63 20 3d | 20 31 3b 20 63 20 3c 3d |for (c =| 1; c <=|
|00001d30| 20 28 63 6c 69 70 44 6f | 63 75 6d 65 6e 74 2d 3e | (clipDo|cument->|
|00001d40| 66 4e 6f 4f 66 43 6f 6c | 75 6d 6e 73 29 3b 20 2b |fNoOfCol|umns); +|
|00001d50| 2b 63 29 0d 09 09 09 7b | 0d 09 09 09 09 61 43 6f |+c)....{|.....aCo|
|00001d60| 6c 75 6d 6e 20 3d 20 54 | 48 5f 6e 65 77 20 54 43 |lumn = T|H_new TC|
|00001d70| 6f 6c 75 6d 6e 28 63 29 | 3b 0d 09 09 09 09 61 43 |olumn(c)|;.....aC|
|00001d80| 6f 6c 75 6d 6e 2d 3e 52 | 65 61 64 46 72 6f 6d 53 |olumn->R|eadFromS|
|00001d90| 63 72 61 70 28 63 61 6c | 63 53 63 72 61 70 2c 20 |crap(cal|cScrap, |
|00001da0| 73 63 72 61 70 4f 66 66 | 73 65 74 29 3b 0d 09 09 |scrapOff|set);...|
|00001db0| 09 09 63 6c 69 70 44 6f | 63 75 6d 65 6e 74 2d 3e |..clipDo|cument->|
|00001dc0| 41 64 64 43 6f 6c 75 6d | 6e 28 61 43 6f 6c 75 6d |AddColum|n(aColum|
|00001dd0| 6e 29 3b 0d 09 09 09 7d | 0d 0d 09 09 09 63 65 6c |n);....}|.....cel|
|00001de0| 6c 73 52 65 61 64 20 3d | 20 30 3b 0d 09 09 09 66 |lsRead =| 0;....f|
|00001df0| 6f 72 20 28 69 20 3d 20 | 31 3b 20 69 20 3c 3d 20 |or (i = |1; i <= |
|00001e00| 28 73 63 72 61 70 49 6e | 66 6f 2e 6e 6f 4f 66 43 |(scrapIn|fo.noOfC|
|00001e10| 65 6c 6c 73 29 3b 20 2b | 2b 69 29 0d 09 09 09 7b |ells); +|+i)....{|
|00001e20| 0d 09 09 09 09 52 65 61 | 64 53 63 72 61 70 28 63 |.....Rea|dScrap(c|
|00001e30| 61 6c 63 53 63 72 61 70 | 2c 20 73 63 72 61 70 4f |alcScrap|, scrapO|
|00001e40| 66 66 73 65 74 2c 20 26 | 63 65 6c 6c 43 6f 6f 72 |ffset, &|cellCoor|
|00001e50| 64 2c 20 73 69 7a 65 6f | 66 28 47 72 69 64 43 65 |d, sizeo|f(GridCe|
|00001e60| 6c 6c 29 29 3b 0d 09 09 | 09 09 61 43 65 6c 6c 20 |ll));...|..aCell |
|00001e70| 3d 20 63 6c 69 70 44 6f | 63 75 6d 65 6e 74 2d 3e |= clipDo|cument->|
|00001e80| 47 65 74 43 65 6c 6c 28 | 63 65 6c 6c 43 6f 6f 72 |GetCell(|cellCoor|
|00001e90| 64 29 3b 0d 09 09 09 09 | 61 43 65 6c 6c 2d 3e 52 |d);.....|aCell->R|
|00001ea0| 65 61 64 46 72 6f 6d 53 | 63 72 61 70 28 63 61 6c |eadFromS|crap(cal|
|00001eb0| 63 53 63 72 61 70 2c 20 | 73 63 72 61 70 4f 66 66 |cScrap, |scrapOff|
|00001ec0| 73 65 74 29 3b 0d 09 09 | 09 09 63 65 6c 6c 73 52 |set);...|..cellsR|
|00001ed0| 65 61 64 20 3d 20 63 65 | 6c 6c 73 52 65 61 64 20 |ead = ce|llsRead |
|00001ee0| 2b 20 31 3b 0d 09 09 09 | 7d 0d 0d 23 69 66 20 71 |+ 1;....|}..#if q|
|00001ef0| 44 65 62 75 67 0d 09 09 | 09 69 66 20 28 67 49 6e |Debug...|.if (gIn|
|00001f00| 74 65 6e 73 65 44 65 62 | 75 67 67 69 6e 67 29 0d |tenseDeb|ugging).|
|00001f10| 09 09 09 7b 0d 09 09 09 | 09 50 72 6f 67 72 61 6d |...{....|.Program|
|00001f20| 42 72 65 61 6b 5f 41 43 | 28 22 4d 61 6b 65 56 69 |Break_AC|("MakeVi|
|00001f30| 65 77 46 6f 72 41 6c 69 | 65 6e 43 6c 69 70 62 6f |ewForAli|enClipbo|
|00001f40| 61 72 64 3a 20 63 65 6c | 6c 73 52 65 61 64 3d 25 |ard: cel|lsRead=%|
|00001f50| 64 20 73 63 72 61 70 49 | 6e 66 6f 2e 6e 6f 4f 66 |d scrapI|nfo.noOf|
|00001f60| 43 65 6c 6c 73 3d 25 64 | 5c 6e 22 2c 20 63 65 6c |Cells=%d|\n", cel|
|00001f70| 6c 73 52 65 61 64 2c 20 | 73 63 72 61 70 49 6e 66 |lsRead, |scrapInf|
|00001f80| 6f 2e 6e 6f 4f 66 43 65 | 6c 6c 73 29 3b 0d 09 09 |o.noOfCe|lls);...|
|00001f90| 09 09 69 66 20 28 63 65 | 6c 6c 73 52 65 61 64 20 |..if (ce|llsRead |
|00001fa0| 21 3d 20 73 63 72 61 70 | 49 6e 66 6f 2e 6e 6f 4f |!= scrap|Info.noO|
|00001fb0| 66 43 65 6c 6c 73 29 0d | 09 09 09 09 09 50 72 6f |fCells).|.....Pro|
|00001fc0| 67 72 61 6d 42 72 65 61 | 6b 5f 41 43 28 22 4d 61 |gramBrea|k_AC("Ma|
|00001fd0| 6b 65 56 69 65 77 46 6f | 72 41 6c 69 65 6e 43 6c |keViewFo|rAlienCl|
|00001fe0| 69 70 62 6f 61 72 64 3a | 20 57 72 6f 6e 67 20 6e |ipboard:| Wrong n|
|00001ff0| 75 6d 62 65 72 20 6f 66 | 20 63 65 6c 6c 73 22 29 |umber of| cells")|
|00002000| 3b 0d 09 09 09 7d 0d 23 | 65 6e 64 69 66 0d 0d 09 |;....}.#|endif...|
|00002010| 09 09 63 6c 69 70 56 69 | 65 77 2d 3e 55 70 64 61 |..clipVi|ew->Upda|
|00002020| 74 65 46 72 6f 6d 44 6f | 63 75 6d 65 6e 74 28 29 |teFromDo|cument()|
|00002030| 3b 09 09 2f 2f 20 75 70 | 64 61 74 65 20 76 69 65 |;..// up|date vie|
|00002040| 77 27 73 20 6e 75 6d 62 | 65 72 20 6f 66 20 72 6f |w's numb|er of ro|
|00002050| 77 73 2c 20 63 6f 6c 75 | 6d 6e 73 2c 20 65 74 63 |ws, colu|mns, etc|
|00002060| 0d 09 09 09 72 65 74 75 | 72 6e 56 61 6c 20 3d 20 |....retu|rnVal = |
|00002070| 63 6c 69 70 56 69 65 77 | 3b 0d 09 09 7d 0d 09 09 |clipView|;...}...|
|00002080| 63 61 74 63 68 28 43 45 | 78 63 65 70 74 69 6f 6e |catch(CE|xception|
|00002090| 5f 41 43 26 29 0d 09 09 | 7b 09 09 09 09 09 09 09 |_AC&)...|{.......|
|000020a0| 09 09 09 2f 2f 57 65 20 | 46 61 69 6c 65 64 20 73 |...//We |Failed s|
|000020b0| 6f 6d 65 77 68 65 72 65 | 20 61 6c 6f 6e 67 20 74 |omewhere| along t|
|000020c0| 68 65 20 6c 69 6e 65 0d | 09 09 09 64 65 6c 65 74 |he line.|...delet|
|000020d0| 65 20 63 6c 69 70 44 6f | 63 75 6d 65 6e 74 3b 0d |e clipDo|cument;.|
|000020e0| 0d 09 09 09 74 68 72 6f | 77 3b 0d 09 09 7d 0d 09 |....thro|w;...}..|
|000020f0| 7d 0d 09 65 6c 73 65 0d | 09 09 72 65 74 75 72 6e |}..else.|..return|
|00002100| 56 61 6c 20 3d 20 54 41 | 70 70 6c 69 63 61 74 69 |Val = TA|pplicati|
|00002110| 6f 6e 3a 3a 4d 61 6b 65 | 56 69 65 77 46 6f 72 41 |on::Make|ViewForA|
|00002120| 6c 69 65 6e 43 6c 69 70 | 62 6f 61 72 64 28 29 3b |lienClip|board();|
|00002130| 0d 09 0d 09 72 65 74 75 | 72 6e 20 72 65 74 75 72 |....retu|rn retur|
|00002140| 6e 56 61 6c 3b 0d 7d 0d | 0d 2f 2f 3d 3d 3d 3d 3d |nVal;.}.|.//=====|
|00002150| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002160| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002170| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002180| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002190| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000021a0| 3d 3d 3d 0d 2f 2f 20 43 | 4c 41 53 53 20 54 43 61 |===.// C|LASS TCa|
|000021b0| 6c 63 44 6f 63 75 6d 65 | 6e 74 0d 2f 2f 3d 3d 3d |lcDocume|nt.//===|
|000021c0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000021d0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000021e0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|000021f0| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002200| 3d 3d 3d 3d 3d 3d 3d 3d | 3d 3d 3d 3d 3d 3d 3d 3d |========|========|
|00002210| 3d 3d 3d 3d 3d 0d 4d 41 | 5f 44 45 46 49 4e 45 5f |=====.MA|_DEFINE_|
|00002220| 43 4c 41 53 53 28 54 43 | 61 6c 63 44 6f 63 75 6d |CLASS(TC|alcDocum|
|00002230| 65 6e 74 29 3b 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |ent);../|/-------|
|00002240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002250| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002260| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002270| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002290| 2d 0d 2f 2f 20 54 43 61 | 6c 63 44 6f 63 75 6d 65 |-.// TCa|lcDocume|
|000022a0| 6e 74 3a 3a 54 43 61 6c | 63 44 6f 63 75 6d 65 6e |nt::TCal|cDocumen|
|000022b0| 74 3a 20 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |t: .//--|--------|
|000022c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000022f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002300| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 54 |--------|------.T|
|00002310| 43 61 6c 63 44 6f 63 75 | 6d 65 6e 74 3a 3a 54 43 |CalcDocu|ment::TC|
|00002320| 61 6c 63 44 6f 63 75 6d | 65 6e 74 28 54 46 69 6c |alcDocum|ent(TFil|
|00002330| 65 2a 20 69 74 73 46 69 | 6c 65 2c 20 63 6f 6e 73 |e* itsFi|le, cons|
|00002340| 74 20 47 72 69 64 52 65 | 63 74 26 20 64 69 6d 65 |t GridRe|ct& dime|
|00002350| 6e 73 69 6f 6e 73 29 20 | 3a 0d 09 54 45 64 69 74 |nsions) |:..TEdit|
|00002360| 69 6f 6e 44 6f 63 75 6d | 65 6e 74 28 69 74 73 46 |ionDocum|ent(itsF|
|00002370| 69 6c 65 2c 20 6b 43 61 | 6c 63 53 63 72 61 70 54 |ile, kCa|lcScrapT|
|00002380| 79 70 65 2c 20 6b 53 69 | 67 6e 61 74 75 72 65 29 |ype, kSi|gnature)|
|00002390| 2c 0d 23 69 66 20 71 41 | 4c 4f 45 0d 09 4d 4f 44 |,.#if qA|LOE..MOD|
|000023a0| 41 64 61 70 74 61 62 6c | 65 28 66 61 6c 73 65 29 |Adaptabl|e(false)|
|000023b0| 2c 09 2f 2f 20 66 61 6c | 73 65 20 64 65 66 65 72 |,.// fal|se defer|
|000023c0| 73 20 69 6e 73 74 61 6e | 74 69 61 74 69 6f 6e 20 |s instan|tiation |
|000023d0| 6f 66 20 74 68 65 20 41 | 4c 4f 45 20 63 6f 6e 6e |of the A|LOE conn|
|000023e0| 65 63 74 69 6f 6e 20 26 | 20 6d 61 6e 61 67 65 72 |ection &| manager|
|000023f0| 20 75 6e 74 69 6c 20 77 | 65 20 6b 6e 6f 77 20 77 | until w|e know w|
|00002400| 65 20 6e 65 65 64 20 6f | 6e 65 0d 23 65 6e 64 69 |e need o|ne.#endi|
|00002410| 66 09 0d 09 66 43 65 6c | 6c 73 56 69 65 77 28 4e |f...fCel|lsView(N|
|00002420| 55 4c 4c 29 2c 0d 09 66 | 52 6f 77 73 56 69 65 77 |ULL),..f|RowsView|
|00002430| 28 4e 55 4c 4c 29 2c 0d | 09 66 43 6f 6c 75 6d 6e |(NULL),.|.fColumn|
|00002440| 73 56 69 65 77 28 4e 55 | 4c 4c 29 2c 0d 09 66 45 |sView(NU|LL),..fE|
|00002450| 6e 74 72 79 56 69 65 77 | 28 4e 55 4c 4c 29 2c 0d |ntryView|(NULL),.|
|00002460| 09 66 43 6f 6f 72 64 56 | 69 65 77 28 4e 55 4c 4c |.fCoordV|iew(NULL|
|00002470| 29 2c 0d 0d 09 66 45 64 | 69 74 4c 6f 63 61 74 69 |),...fEd|itLocati|
|00002480| 6f 6e 28 31 2c 20 31 29 | 2c 0d 09 66 45 64 69 74 |on(1, 1)|,..fEdit|
|00002490| 43 65 6c 6c 28 4e 55 4c | 4c 29 0d 7b 0d 09 66 53 |Cell(NUL|L).{..fS|
|000024a0| 61 76 65 50 72 69 6e 74 | 49 6e 66 6f 20 3d 20 74 |avePrint|Info = t|
|000024b0| 72 75 65 3b 09 09 09 09 | 09 09 2f 2f 20 74 68 65 |rue;....|..// the|
|000024c0| 20 27 70 72 69 6e 74 20 | 69 6e 66 6f 27 20 72 65 | 'print |info' re|
|000024d0| 63 6f 72 64 20 6f 66 20 | 74 68 65 0d 09 09 09 09 |cord of |the.....|
|000024e0| 09 09 09 09 09 09 09 09 | 2f 2f 20 66 44 6f 63 50 |........|// fDocP|
|000024f0| 72 69 6e 74 48 61 6e 64 | 6c 65 72 20 77 69 6c 6c |rintHand|ler will|
|00002500| 20 62 65 20 77 72 69 74 | 74 65 6e 20 6f 75 74 20 | be writ|ten out |
|00002510| 74 6f 0d 09 09 09 09 09 | 09 09 09 09 09 09 09 2f |to......|......./|
|00002520| 2f 20 74 68 65 20 64 61 | 74 61 20 66 6f 72 6b 0d |/ the da|ta fork.|
|00002530| 0d 09 66 44 69 6d 65 6e | 73 69 6f 6e 73 20 3d 20 |..fDimen|sions = |
|00002540| 64 69 6d 65 6e 73 69 6f | 6e 73 3b 0d 0d 09 66 4f |dimensio|ns;...fO|
|00002550| 66 66 73 65 74 20 3d 20 | 64 69 6d 65 6e 73 69 6f |ffset = |dimensio|
|00002560| 6e 73 5b 74 6f 70 4c 65 | 66 74 5d 20 2d 20 47 72 |ns[topLe|ft] - Gr|
|00002570| 69 64 43 65 6c 6c 28 31 | 2c 20 31 29 3b 0d 0d 09 |idCell(1|, 1);...|
|00002580| 66 4e 6f 4f 66 52 6f 77 | 73 20 3d 20 64 69 6d 65 |fNoOfRow|s = dime|
|00002590| 6e 73 69 6f 6e 73 2e 62 | 6f 74 74 6f 6d 20 2d 20 |nsions.b|ottom - |
|000025a0| 64 69 6d 65 6e 73 69 6f | 6e 73 2e 74 6f 70 20 2b |dimensio|ns.top +|
|000025b0| 20 31 3b 0d 09 66 4e 6f | 4f 66 43 6f 6c 75 6d 6e | 1;..fNo|OfColumn|
|000025c0| 73 20 3d 20 64 69 6d 65 | 6e 73 69 6f 6e 73 2e 72 |s = dime|nsions.r|
|000025d0| 69 67 68 74 20 2d 20 64 | 69 6d 65 6e 73 69 6f 6e |ight - d|imension|
|000025e0| 73 2e 6c 65 66 74 20 2b | 20 31 3b 0d 09 66 43 61 |s.left +| 1;..fCa|
|000025f0| 6c 63 4d 6f 64 65 20 3d | 20 6b 43 61 6c 63 4d 6f |lcMode =| kCalcMo|
|00002600| 64 65 3b 0d 09 66 53 65 | 6c 65 63 74 69 6f 6e 54 |de;..fSe|lectionT|
|00002610| 79 70 65 20 3d 20 6b 4e | 6f 53 65 6c 65 63 74 69 |ype = kN|oSelecti|
|00002620| 6f 6e 3b 0d 0d 09 66 49 | 6e 55 73 65 42 6f 75 6e |on;...fI|nUseBoun|
|00002630| 64 73 2e 53 65 74 28 31 | 2c 20 31 2c 20 31 2c 20 |ds.Set(1|, 1, 1, |
|00002640| 31 29 3b 0d 0d 09 2f 2f | 20 63 72 65 61 74 65 20 |1);...//| create |
|00002650| 74 68 65 20 75 73 65 72 | 20 73 65 6c 65 63 74 69 |the user| selecti|
|00002660| 6f 6e 20 0d 09 54 43 61 | 6c 63 44 6f 63 75 6d 65 |on ..TCa|lcDocume|
|00002670| 6e 74 3a 3a 53 65 74 55 | 73 65 72 53 65 6c 65 63 |nt::SetU|serSelec|
|00002680| 74 69 6f 6e 28 54 48 5f | 6e 65 77 20 54 47 72 69 |tion(TH_|new TGri|
|00002690| 64 56 69 65 77 44 65 73 | 69 67 6e 61 74 6f 72 28 |dViewDes|ignator(|
|000026a0| 47 72 69 64 52 65 63 74 | 28 31 2c 20 31 2c 20 32 |GridRect|(1, 1, 2|
|000026b0| 2c 20 32 29 29 29 3b 20 | 2f 2f 20 77 6f 6e 27 74 |, 2))); |// won't|
|000026c0| 20 63 61 6c 6c 20 72 69 | 67 68 74 20 66 75 6e 63 | call ri|ght func|
|000026d0| 74 69 6f 6e 20 28 77 69 | 74 68 6f 75 74 20 68 65 |tion (wi|thout he|
|000026e0| 6c 70 29 20 74 69 6c 20 | 63 6f 6e 73 74 72 75 63 |lp) til |construc|
|000026f0| 74 6f 72 20 69 73 20 74 | 68 72 75 0d 7d 0d 0d 0d |tor is t|hru.}...|
|00002700| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00002710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002720| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002730| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002740| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002750| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2f 2f 20 54 43 |--------|--.// TC|
|00002760| 61 6c 63 44 6f 63 75 6d | 65 6e 74 3a 3a 44 6f 49 |alcDocum|ent::DoI|
|00002770| 6e 69 74 69 61 6c 53 74 | 61 74 65 3a 20 0d 2f 2f |nitialSt|ate: .//|
|00002780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027d0| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 76 6f 69 64 20 54 43 |--------|.void TC|
|000027e0| 61 6c 63 44 6f 63 75 6d | 65 6e 74 3a 3a 44 6f 49 |alcDocum|ent::DoI|
|000027f0| 6e 69 74 69 61 6c 53 74 | 61 74 65 28 29 09 2f 2f |nitialSt|ate().//|
|00002800| 20 6f 76 65 72 72 69 64 | 65 20 0d 7b 0d 09 66 41 | overrid|e .{..fA|
|00002810| 6c 6c 6f 63 61 74 65 64 | 43 65 6c 6c 73 20 3d 20 |llocated|Cells = |
|00002820| 30 3b 0d 09 66 41 6c 6c | 6f 63 61 74 65 64 52 6f |0;..fAll|ocatedRo|
|00002830| 77 73 20 3d 20 30 3b 0d | 09 66 41 6c 6c 6f 63 61 |ws = 0;.|.fAlloca|
|00002840| 74 65 64 43 6f 6c 75 6d | 6e 73 20 3d 20 30 3b 0d |tedColum|ns = 0;.|
|00002850| 7d 0d 0d 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}...//--|--------|
|00002860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002870| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002880| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2f |--------|------./|
|000028b0| 2f 20 54 43 61 6c 63 44 | 6f 63 75 6d 65 6e 74 3a |/ TCalcD|ocument:|
|000028c0| 3a 44 6f 4d 61 6b 65 56 | 69 65 77 73 3a 20 0d 2f |:DoMakeV|iews: ./|
|000028d0| 2f 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/-------|--------|
|000028e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000028f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 76 6f 69 64 20 54 |--------|-.void T|
|00002930| 43 61 6c 63 44 6f 63 75 | 6d 65 6e 74 3a 3a 44 6f |CalcDocu|ment::Do|
|00002940| 4d 61 6b 65 56 69 65 77 | 73 28 62 6f 6f 6c 20 66 |MakeView|s(bool f|
|00002950| 6f 72 50 72 69 6e 74 69 | 6e 67 29 0d 7b 0d 09 54 |orPrinti|ng).{..T|
|00002960| 43 61 6c 63 57 69 6e 64 | 6f 77 20 2a 20 61 43 61 |CalcWind|ow * aCa|
|00002970| 6c 63 57 69 6e 64 6f 77 | 3b 0d 09 54 45 6e 74 72 |lcWindow|;..TEntr|
|00002980| 79 56 69 65 77 20 2a 20 | 61 54 45 6e 74 72 79 56 |yView * |aTEntryV|
|00002990| 69 65 77 3b 0d 09 54 43 | 65 6c 6c 73 56 69 65 77 |iew;..TC|ellsView|
|000029a0| 20 2a 20 61 43 65 6c 6c | 73 56 69 65 77 3b 0d 09 | * aCell|sView;..|
|000029b0| 54 43 6f 6c 75 6d 6e 73 | 56 69 65 77 20 2a 20 61 |TColumns|View * a|
|000029c0| 43 6f 6c 75 6d 6e 73 56 | 69 65 77 3b 0d 09 54 52 |ColumnsV|iew;..TR|
|000029d0| 6f 77 73 56 69 65 77 20 | 2a 20 61 52 6f 77 73 56 |owsView |* aRowsV|
|000029e0| 69 65 77 3b 0d 09 54 43 | 6f 6f 72 64 56 69 65 77 |iew;..TC|oordView|
|000029f0| 20 2a 20 61 43 6f 6f 72 | 64 56 69 65 77 3b 0d 09 | * aCoor|dView;..|
|00002a00| 54 53 65 63 6f 6e 64 61 | 72 79 53 63 72 6f 6c 6c |TSeconda|ryScroll|
|00002a10| 65 72 20 2a 20 61 52 6f | 77 53 63 72 6f 6c 6c 65 |er * aRo|wScrolle|
|00002a20| 72 3b 0d 09 54 53 65 63 | 6f 6e 64 61 72 79 53 63 |r;..TSec|ondarySc|
|00002a30| 72 6f 6c 6c 65 72 20 2a | 20 61 43 6f 6c 75 6d 6e |roller *| aColumn|
|00002a40| 53 63 72 6f 6c 6c 65 72 | 3b 0d 09 54 50 72 69 6d |Scroller|;..TPrim|
|00002a50| 61 72 79 53 63 72 6f 6c | 6c 65 72 20 2a 20 61 43 |aryScrol|ler * aC|
|00002a60| 61 6c 63 53 63 72 6f 6c | 6c 65 72 3b 0d 0d 09 43 |alcScrol|ler;...C|
|00002a70| 56 69 65 77 50 6f 69 6e | 74 20 61 56 50 74 3b 0d |ViewPoin|t aVPt;.|
|00002a80| 0d 09 61 43 61 6c 63 57 | 69 6e 64 6f 77 20 3d 20 |..aCalcW|indow = |
|00002a90| 64 79 6e 61 6d 69 63 5f | 63 61 73 74 5f 41 43 28 |dynamic_|cast_AC(|
|00002aa0| 54 43 61 6c 63 57 69 6e | 64 6f 77 2a 2c 20 54 56 |TCalcWin|dow*, TV|
|00002ab0| 69 65 77 53 65 72 76 65 | 72 3a 3a 66 67 56 69 65 |iewServe|r::fgVie|
|00002ac0| 77 53 65 72 76 65 72 2d | 3e 4e 65 77 54 65 6d 70 |wServer-|>NewTemp|
|00002ad0| 6c 61 74 65 57 69 6e 64 | 6f 77 28 6b 43 61 6c 63 |lateWind|ow(kCalc|
|00002ae0| 57 69 6e 64 6f 77 54 79 | 70 65 2c 20 74 68 69 73 |WindowTy|pe, this|
|00002af0| 29 29 3b 0d 0d 09 61 43 | 65 6c 6c 73 56 69 65 77 |));...aC|ellsView|
|00002b00| 20 3d 20 64 79 6e 61 6d | 69 63 5f 63 61 73 74 5f | = dynam|ic_cast_|
|00002b10| 41 43 28 54 43 65 6c 6c | 73 56 69 65 77 2a 2c 20 |AC(TCell|sView*, |
|00002b20| 61 43 61 6c 63 57 69 6e | 64 6f 77 2d 3e 46 69 6e |aCalcWin|dow->Fin|
|00002b30| 64 53 75 62 56 69 65 77 | 28 27 43 45 4c 4c 27 29 |dSubView|('CELL')|
|00002b40| 29 3b 0d 09 61 52 6f 77 | 73 56 69 65 77 20 3d 20 |);..aRow|sView = |
|00002b50| 64 79 6e 61 6d 69 63 5f | 63 61 73 74 5f 41 43 28 |dynamic_|cast_AC(|
|00002b60| 54 52 6f 77 73 56 69 65 | 77 2a 2c 20 61 43 61 6c |TRowsVie|w*, aCal|
|00002b70| 63 57 69 6e 64 6f 77 2d | 3e 46 69 6e 64 53 75 62 |cWindow-|>FindSub|
|00002b80| 56 69 65 77 28 27 52 4f | 57 53 27 29 29 3b 0d 09 |View('RO|WS'));..|
|00002b90| 61 43 6f 6c 75 6d 6e 73 | 56 69 65 77 20 3d 20 64 |aColumns|View = d|
|00002ba0| 79 6e 61 6d 69 63 5f 63 | 61 73 74 5f 41 43 28 54 |ynamic_c|ast_AC(T|
|00002bb0| 43 6f 6c 75 6d 6e 73 56 | 69 65 77 2a 2c 20 61 43 |ColumnsV|iew*, aC|
|00002bc0| 61 6c 63 57 69 6e 64 6f | 77 2d 3e 46 69 6e 64 53 |alcWindo|w->FindS|
|00002bd0| 75 62 56 69 65 77 28 27 | 43 4f 4c 53 27 29 29 3b |ubView('|COLS'));|
|00002be0| 0d 09 61 54 45 6e 74 72 | 79 56 69 65 77 20 3d 20 |..aTEntr|yView = |
|00002bf0| 64 79 6e 61 6d 69 63 5f | 63 61 73 74 5f 41 43 28 |dynamic_|cast_AC(|
|00002c00| 54 45 6e 74 72 79 56 69 | 65 77 2a 2c 20 61 43 61 |TEntryVi|ew*, aCa|
|00002c10| 6c 63 57 69 6e 64 6f 77 | 2d 3e 46 69 6e 64 53 75 |lcWindow|->FindSu|
|00002c20| 62 56 69 65 77 28 27 45 | 4e 54 56 27 29 29 3b 0d |bView('E|NTV'));.|
|00002c30| 09 61 43 6f 6f 72 64 56 | 69 65 77 20 3d 20 64 79 |.aCoordV|iew = dy|
|00002c40| 6e 61 6d 69 63 5f 63 61 | 73 74 5f 41 43 28 54 43 |namic_ca|st_AC(TC|
|00002c50| 6f 6f 72 64 56 69 65 77 | 2a 2c 20 61 43 61 6c 63 |oordView|*, aCalc|
|00002c60| 57 69 6e 64 6f 77 2d 3e | 46 69 6e 64 53 75 62 56 |Window->|FindSubV|
|00002c70| 69 65 77 28 27 43 4f 52 | 44 27 29 29 3b 0d 0d 0d |iew('COR|D'));...|
|00002c80| 09 66 43 65 6c 6c 73 56 | 69 65 77 20 3d 20 61 43 |.fCellsV|iew = aC|
|00002c90| 65 6c 6c 73 56 69 65 77 | 3b 0d 09 66 52 6f 77 73 |ellsView|;..fRows|
|00002ca0| 56 69 65 77 20 3d 20 61 | 52 6f 77 73 56 69 65 77 |View = a|RowsView|
|00002cb0| 3b 0d 09 66 43 6f 6c 75 | 6d 6e 73 56 69 65 77 20 |;..fColu|mnsView |
|00002cc0| 3d 20 61 43 6f 6c 75 6d | 6e 73 56 69 65 77 3b 0d |= aColum|nsView;.|
|00002cd0| 09 66 45 6e 74 72 79 56 | 69 65 77 20 3d 20 61 54 |.fEntryV|iew = aT|
|00002ce0| 45 6e 74 72 79 56 69 65 | 77 3b 0d 09 66 43 6f 6f |EntryVie|w;..fCoo|
|00002cf0| 72 64 56 69 65 77 20 3d | 20 61 43 6f 6f 72 64 56 |rdView =| aCoordV|
|00002d00| 69 65 77 3b 0d 0d 09 2f | 2f 20 54 68 65 20 54 53 |iew;.../|/ The TS|
|00002d10| 65 63 74 69 6f 6e 42 65 | 68 61 76 69 6f 72 20 69 |ectionBe|havior i|
|00002d20| 73 20 6e 6f 77 20 61 64 | 64 65 64 20 74 6f 20 74 |s now ad|ded to t|
|00002d30| 68 65 20 54 43 65 6c 6c | 73 56 69 65 77 20 69 6e |he TCell|sView in|
|00002d40| 20 74 68 65 20 27 56 69 | 65 77 27 20 72 65 73 6f | the 'Vi|ew' reso|
|00002d50| 75 72 63 65 20 28 73 65 | 65 20 43 61 6c 63 2e 72 |urce (se|e Calc.r|
|00002d60| 29 2e 0d 09 2f 2f 20 44 | 6f 41 64 64 53 65 63 74 |)...// D|oAddSect|
|00002d70| 69 6f 6e 42 65 68 61 76 | 69 6f 72 28 66 43 65 6c |ionBehav|ior(fCel|
|00002d80| 6c 73 56 69 65 77 29 3b | 09 09 2f 2f 20 61 64 64 |lsView);|..// add|
|00002d90| 20 73 75 70 70 6f 72 74 | 20 66 6f 72 20 45 64 20 | support| for Ed |
|00002da0| 4d 67 72 20 73 68 6f 72 | 74 63 75 74 73 0d 0d 09 |Mgr shor|tcuts...|
|00002db0| 69 66 20 28 21 66 6f 72 | 50 72 69 6e 74 69 6e 67 |if (!for|Printing|
|00002dc0| 29 0d 09 7b 0d 09 09 61 | 54 45 6e 74 72 79 56 69 |)..{...a|TEntryVi|
|00002dd0| 65 77 2d 3e 66 54 65 78 | 74 20 3d 20 4e 55 4c 4c |ew->fTex|t = NULL|
|00002de0| 3b 0d 09 09 61 54 45 6e | 74 72 79 56 69 65 77 2d |;...aTEn|tryView-|
|00002df0| 3e 66 54 65 78 74 20 3d | 20 4e 65 77 50 65 72 6d |>fText =| NewPerm|
|00002e00| 48 61 6e 64 6c 65 28 30 | 29 3b 0d 09 09 61 54 45 |Handle(0|);...aTE|
|00002e10| 6e 74 72 79 56 69 65 77 | 2d 3e 53 74 75 66 66 54 |ntryView|->StuffT|
|00002e20| 65 78 74 28 61 54 45 6e | 74 72 79 56 69 65 77 2d |ext(aTEn|tryView-|
|00002e30| 3e 66 54 65 78 74 29 3b | 2f 2f 20 53 74 75 66 66 |>fText);|// Stuff|
|00002e40| 20 74 68 65 20 69 6e 69 | 74 69 61 6c 20 74 65 78 | the ini|tial tex|
|00002e50| 74 20 69 6e 20 0d 09 7d | 0d 0d 09 2f 2f 20 54 68 |t in ..}|...// Th|
|00002e60| 65 20 65 6e 74 72 79 20 | 76 69 65 77 20 69 73 20 |e entry |view is |
|00002e70| 74 68 65 20 74 61 72 67 | 65 74 2e 20 49 74 73 20 |the targ|et. Its |
|00002e80| 6e 65 78 74 20 68 61 6e | 64 6c 65 72 20 69 73 20 |next han|dler is |
|00002e90| 74 68 65 20 63 65 6c 6c | 73 20 76 69 65 77 0d 09 |the cell|s view..|
|00002ea0| 2f 2f 20 54 45 6e 74 72 | 79 56 69 65 77 2e 44 6f |// TEntr|yView.Do|
|00002eb0| 50 6f 73 74 43 72 65 61 | 74 65 20 73 65 74 73 20 |PostCrea|te sets |
|00002ec0| 74 68 65 20 66 43 6f 6e | 74 72 6f 6c 43 68 61 72 |the fCon|trolChar|
|00002ed0| 73 20 66 69 65 6c 64 20 | 73 6f 20 74 68 61 74 20 |s field |so that |
|00002ee0| 52 65 74 75 72 6e 2c 20 | 45 6e 74 65 72 20 65 74 |Return, |Enter et|
|00002ef0| 63 2e 20 0d 09 2f 2f 20 | 61 72 65 20 70 61 73 73 |c. ..// |are pass|
|00002f00| 65 64 20 6f 6e 20 74 6f | 20 74 68 65 20 63 65 6c |ed on to| the cel|
|00002f10| 6c 73 20 76 69 65 77 0d | 0d 09 61 43 61 6c 63 57 |ls view.|..aCalcW|
|00002f20| 69 6e 64 6f 77 2d 3e 53 | 65 74 57 69 6e 64 6f 77 |indow->S|etWindow|
|00002f30| 54 61 72 67 65 74 28 61 | 54 45 6e 74 72 79 56 69 |Target(a|TEntryVi|
|00002f40| 65 77 29 3b 0d 09 61 54 | 45 6e 74 72 79 56 69 65 |ew);..aT|EntryVie|
|00002f50| 77 2d 3e 53 65 74 4e 65 | 78 74 48 61 6e 64 6c 65 |w->SetNe|xtHandle|
|00002f60| 72 28 61 43 65 6c 6c 73 | 56 69 65 77 29 3b 0d 0d |r(aCells|View);..|
|00002f70| 09 2f 2f 20 73 65 74 20 | 75 70 20 74 68 65 20 63 |.// set |up the c|
|00002f80| 65 6c 6c 73 20 76 69 65 | 77 20 73 63 72 6f 6c 6c |ells vie|w scroll|
|00002f90| 65 72 20 74 6f 20 73 63 | 72 6f 6c 6c 20 74 68 65 |er to sc|roll the|
|00002fa0| 20 72 6f 77 73 20 61 6e | 64 20 63 6f 6c 75 6d 6e | rows an|d column|
|00002fb0| 73 20 74 6f 6f 20 0d 09 | 61 43 61 6c 63 53 63 72 |s too ..|aCalcScr|
|00002fc0| 6f 6c 6c 65 72 20 3d 20 | 64 79 6e 61 6d 69 63 5f |oller = |dynamic_|
|00002fd0| 63 61 73 74 5f 41 43 28 | 54 50 72 69 6d 61 72 79 |cast_AC(|TPrimary|
|00002fe0| 53 63 72 6f 6c 6c 65 72 | 2a 2c 61 43 65 6c 6c 73 |Scroller|*,aCells|
|00002ff0| 56 69 65 77 2d 3e 47 65 | 74 53 63 72 6f 6c 6c 65 |View->Ge|tScrolle|
|00003000| 72 28 74 72 75 65 29 29 | 3b 0d 09 61 56 50 74 2e |r(true))|;..aVPt.|
|00003010| 53 65 74 28 6b 43 65 6c | 6c 57 69 64 74 68 2c 20 |Set(kCel|lWidth, |
|00003020| 6b 43 65 6c 6c 48 65 69 | 67 68 74 29 3b 0d 09 61 |kCellHei|ght);..a|
|00003030| 43 61 6c 63 53 63 72 6f | 6c 6c 65 72 2d 3e 53 65 |CalcScro|ller->Se|
|00003040| 74 53 63 72 6f 6c 6c 50 | 61 72 61 6d 65 74 65 72 |tScrollP|arameter|
|00003050| 73 28 61 56 50 74 2c 20 | 74 72 75 65 2c 20 74 72 |s(aVPt, |true, tr|
|00003060| 75 65 29 3b 0d 0d 09 61 | 43 6f 6c 75 6d 6e 53 63 |ue);...a|ColumnSc|
|00003070| 72 6f 6c 6c 65 72 20 3d | 20 64 79 6e 61 6d 69 63 |roller =| dynamic|
|00003080| 5f 63 61 73 74 5f 41 43 | 28 54 53 65 63 6f 6e 64 |_cast_AC|(TSecond|
|00003090| 61 72 79 53 63 72 6f 6c | 6c 65 72 2a 2c 61 43 6f |aryScrol|ler*,aCo|
|000030a0| 6c 75 6d 6e 73 56 69 65 | 77 2d 3e 47 65 74 53 63 |lumnsVie|w->GetSc|
|000030b0| 72 6f 6c 6c 65 72 28 74 | 72 75 65 29 29 3b 0d 09 |roller(t|rue));..|
|000030c0| 61 56 50 74 2e 53 65 74 | 28 6b 43 65 6c 6c 57 69 |aVPt.Set|(kCellWi|
|000030d0| 64 74 68 2c 20 30 29 3b | 0d 09 61 43 6f 6c 75 6d |dth, 0);|..aColum|
|000030e0| 6e 53 63 72 6f 6c 6c 65 | 72 2d 3e 53 65 74 53 63 |nScrolle|r->SetSc|
|000030f0| 72 6f 6c 6c 50 61 72 61 | 6d 65 74 65 72 73 28 61 |rollPara|meters(a|
|00003100| 56 50 74 2c 20 74 72 75 | 65 2c 20 74 72 75 65 29 |VPt, tru|e, true)|
|00003110| 3b 0d 0d 09 61 52 6f 77 | 53 63 72 6f 6c 6c 65 72 |;...aRow|Scroller|
|00003120| 20 3d 20 64 79 6e 61 6d | 69 63 5f 63 61 73 74 5f | = dynam|ic_cast_|
|00003130| 41 43 28 54 53 65 63 6f | 6e 64 61 72 79 53 63 72 |AC(TSeco|ndaryScr|
|00003140| 6f 6c 6c 65 72 2a 2c 61 | 52 6f 77 73 56 69 65 77 |oller*,a|RowsView|
|00003150| 2d 3e 47 65 74 53 63 72 | 6f 6c 6c 65 72 28 74 72 |->GetScr|oller(tr|
|00003160| 75 65 29 29 3b 0d 09 61 | 56 50 74 2e 53 65 74 28 |ue));..a|VPt.Set(|
|00003170| 30 2c 20 6b 43 65 6c 6c | 48 65 69 67 68 74 29 3b |0, kCell|Height);|
|00003180| 0d 09 61 52 6f 77 53 63 | 72 6f 6c 6c 65 72 2d 3e |..aRowSc|roller->|
|00003190| 53 65 74 53 63 72 6f 6c | 6c 50 61 72 61 6d 65 74 |SetScrol|lParamet|
|000031a0| 65 72 73 28 61 56 50 74 | 2c 20 74 72 75 65 2c 20 |ers(aVPt|, true, |
|000031b0| 74 72 75 65 29 3b 0d 0d | 09 61 43 61 6c 63 53 63 |true);..|.aCalcSc|
|000031c0| 72 6f 6c 6c 65 72 2d 3e | 41 64 64 53 65 63 6f 6e |roller->|AddSecon|
|000031d0| 64 61 72 79 53 63 72 6f | 6c 6c 65 72 28 61 52 6f |daryScro|ller(aRo|
|000031e0| 77 53 63 72 6f 6c 6c 65 | 72 2c 20 6b 4e 6f 74 48 |wScrolle|r, kNotH|
|000031f0| 44 65 70 65 6e 64 65 6e | 74 2c 20 6b 56 44 65 70 |Dependen|t, kVDep|
|00003200| 65 6e 64 65 6e 74 29 3b | 0d 09 61 43 61 6c 63 53 |endent);|..aCalcS|
|00003210| 63 72 6f 6c 6c 65 72 2d | 3e 41 64 64 53 65 63 6f |croller-|>AddSeco|
|00003220| 6e 64 61 72 79 53 63 72 | 6f 6c 6c 65 72 28 61 43 |ndaryScr|oller(aC|
|00003230| 6f 6c 75 6d 6e 53 63 72 | 6f 6c 6c 65 72 2c 20 6b |olumnScr|oller, k|
|00003240| 48 44 65 70 65 6e 64 65 | 6e 74 2c 20 6b 4e 6f 74 |HDepende|nt, kNot|
|00003250| 56 44 65 70 65 6e 64 65 | 6e 74 29 3b 0d 0d 09 54 |VDepende|nt);...T|
|00003260| 43 61 6c 63 50 72 69 6e | 74 48 61 6e 64 6c 65 72 |CalcPrin|tHandler|
|00003270| 2a 20 61 50 72 69 6e 74 | 48 61 6e 64 6c 65 72 20 |* aPrint|Handler |
|00003280| 3d 20 54 48 5f 6e 65 77 | 20 54 43 61 6c 63 50 72 |= TH_new| TCalcPr|
|00003290| 69 6e 74 48 61 6e 64 6c | 65 72 28 74 68 69 73 2c |intHandl|er(this,|
|000032a0| 09 09 09 2f 2f 20 69 74 | 73 20 64 6f 63 75 6d 65 |...// it|s docume|
|000032b0| 6e 74 20 0d 09 09 09 09 | 09 09 09 09 09 61 43 65 |nt .....|.....aCe|
|000032c0| 6c 6c 73 56 69 65 77 2c | 09 09 2f 2f 20 69 74 73 |llsView,|..// its|
|000032d0| 20 76 69 65 77 20 0d 09 | 09 09 09 09 09 09 09 09 | view ..|........|
|000032e0| 21 6b 46 69 78 65 64 53 | 69 7a 65 2c 09 2f 2f 20 |!kFixedS|ize,.// |
|000032f0| 68 6f 72 69 7a 6f 6e 74 | 61 6c 20 70 61 67 65 20 |horizont|al page |
|00003300| 73 69 7a 65 20 69 73 20 | 76 61 72 69 61 62 6c 65 |size is |variable|
|00003310| 20 0d 09 09 09 09 09 09 | 09 09 09 6b 46 69 78 65 | .......|...kFixe|
|00003320| 64 53 69 7a 65 29 3b 09 | 2f 2f 20 76 65 72 74 69 |dSize);.|// verti|
|00003330| 63 61 6c 20 70 61 67 65 | 20 73 69 7a 65 20 69 73 |cal page| size is|
|00003340| 20 66 69 78 65 64 20 0d | 09 61 50 72 69 6e 74 48 | fixed .|.aPrintH|
|00003350| 61 6e 64 6c 65 72 2d 3e | 66 4d 69 6e 69 6d 61 6c |andler->|fMinimal|
|00003360| 4d 61 72 67 69 6e 73 20 | 3d 20 66 61 6c 73 65 3b |Margins |= false;|
|00003370| 0d 0d 09 2f 2f 20 67 65 | 74 20 65 78 69 73 74 69 |...// ge|t existi|
|00003380| 6e 67 20 64 6f 63 75 6d | 65 6e 74 27 73 20 63 6f |ng docum|ent's co|
|00003390| 6c 75 6d 6e 20 77 69 64 | 74 68 73 20 0d 09 66 6f |lumn wid|ths ..fo|
|000033a0| 72 20 28 43 43 61 6c 63 | 43 6f 6c 75 6d 6e 49 74 |r (CCalc|ColumnIt|
|000033b0| 65 72 61 74 6f 72 20 69 | 74 65 72 28 74 68 69 73 |erator i|ter(this|
|000033c0| 29 3b 20 69 74 65 72 2e | 43 75 72 72 65 6e 74 28 |); iter.|Current(|
|000033d0| 29 3b 20 2b 2b 69 74 65 | 72 29 0d 23 69 66 20 64 |); ++ite|r).#if d|
|000033e0| 65 66 69 6e 65 64 28 5f | 5f 53 43 5f 5f 29 20 7c |efined(_|_SC__) ||
|000033f0| 7c 20 64 65 66 69 6e 65 | 64 28 5f 5f 4d 52 43 5f || define|d(__MRC_|
|00003400| 5f 29 0d 09 09 69 66 20 | 28 28 2a 69 74 65 72 29 |_)...if |((*iter)|
|00003410| 2e 66 57 69 64 74 68 20 | 21 3d 20 6b 43 65 6c 6c |.fWidth |!= kCell|
|00003420| 57 69 64 74 68 29 09 09 | 2f 2f 2a 54 59 20 30 35 |Width)..|//*TY 05|
|00003430| 2f 30 33 2f 39 38 20 2d | 20 63 68 61 6e 67 65 64 |/03/98 -| changed|
|00003440| 20 66 72 6f 6d 20 69 74 | 65 72 2d 3e 20 74 6f 20 | from it|er-> to |
|00003450| 28 2a 69 74 65 72 29 2e | 20 74 6f 20 77 6f 72 6b |(*iter).| to work|
|00003460| 61 72 6f 75 6e 64 20 53 | 43 70 70 20 70 72 6f 62 |around S|Cpp prob|
|00003470| 6c 65 6d 0d 09 09 7b 0d | 09 09 09 66 43 65 6c 6c |lem...{.|...fCell|
|00003480| 73 56 69 65 77 2d 3e 53 | 65 74 43 6f 6c 57 69 64 |sView->S|etColWid|
|00003490| 74 68 28 28 2a 69 74 65 | 72 29 2e 66 4e 75 6d 62 |th((*ite|r).fNumb|
|000034a0| 65 72 2c 20 31 2c 20 28 | 2a 69 74 65 72 29 2e 66 |er, 1, (|*iter).f|
|000034b0| 57 69 64 74 68 29 3b 09 | 09 2f 2f 2a 54 59 20 30 |Width);.|.//*TY 0|
|000034c0| 35 2f 30 33 2f 39 38 20 | 2d 20 63 68 61 6e 67 65 |5/03/98 |- change|
|000034d0| 64 20 66 72 6f 6d 20 69 | 74 65 72 2d 3e 20 74 6f |d from i|ter-> to|
|000034e0| 20 28 2a 69 74 65 72 29 | 2e 20 74 6f 20 77 6f 72 | (*iter)|. to wor|
|000034f0| 6b 61 72 6f 75 6e 64 20 | 53 43 70 70 20 70 72 6f |karound |SCpp pro|
|00003500| 62 6c 65 6d 0d 09 09 09 | 66 43 6f 6c 75 6d 6e 73 |blem....|fColumns|
|00003510| 56 69 65 77 2d 3e 53 65 | 74 43 6f 6c 57 69 64 74 |View->Se|tColWidt|
|00003520| 68 28 28 2a 69 74 65 72 | 29 2e 66 4e 75 6d 62 65 |h((*iter|).fNumbe|
|00003530| 72 2c 20 31 2c 20 28 2a | 69 74 65 72 29 2e 66 57 |r, 1, (*|iter).fW|
|00003540| 69 64 74 68 29 3b 09 09 | 2f 2f 2a 54 59 20 30 35 |idth);..|//*TY 05|
|00003550| 2f 30 33 2f 39 38 20 2d | 20 63 68 61 6e 67 65 64 |/03/98 -| changed|
|00003560| 20 66 72 6f 6d 20 69 74 | 65 72 2d 3e 20 74 6f 20 | from it|er-> to |
|00003570| 28 2a 69 74 65 72 29 2e | 20 74 6f 20 77 6f 72 6b |(*iter).| to work|
|00003580| 61 72 6f 75 6e 64 20 53 | 43 70 70 20 70 72 6f 62 |around S|Cpp prob|
|00003590| 6c 65 6d 0d 09 09 7d 0d | 23 65 6c 73 65 0d 09 09 |lem...}.|#else...|
|000035a0| 69 66 20 28 69 74 65 72 | 2d 3e 66 57 69 64 74 68 |if (iter|->fWidth|
|000035b0| 20 21 3d 20 6b 43 65 6c | 6c 57 69 64 74 68 29 0d | != kCel|lWidth).|
|000035c0| 09 09 7b 0d 09 09 09 66 | 43 65 6c 6c 73 56 69 65 |..{....f|CellsVie|
|000035d0| 77 2d 3e 53 65 74 43 6f | 6c 57 69 64 74 68 28 69 |w->SetCo|lWidth(i|
|000035e0| 74 65 72 2d 3e 66 4e 75 | 6d 62 65 72 2c 20 31 2c |ter->fNu|mber, 1,|
|000035f0| 20 69 74 65 72 2d 3e 66 | 57 69 64 74 68 29 3b 0d | iter->f|Width);.|
|00003600| 09 09 09 66 43 6f 6c 75 | 6d 6e 73 56 69 65 77 2d |...fColu|mnsView-|
|00003610| 3e 53 65 74 43 6f 6c 57 | 69 64 74 68 28 69 74 65 |>SetColW|idth(ite|
|00003620| 72 2d 3e 66 4e 75 6d 62 | 65 72 2c 20 31 2c 20 69 |r->fNumb|er, 1, i|
|00003630| 74 65 72 2d 3e 66 57 69 | 64 74 68 29 3b 0d 09 09 |ter->fWi|dth);...|
|00003640| 7d 0d 23 65 6e 64 69 66 | 0d 0d 09 69 66 20 28 66 |}.#endif|...if (f|
|00003650| 6f 72 50 72 69 6e 74 69 | 6e 67 29 09 09 09 09 09 |orPrinti|ng).....|
|00003660| 09 09 2f 2f 20 46 69 6e | 64 65 72 20 70 72 69 6e |..// Fin|der prin|
|00003670| 74 69 6e 67 20 0d 09 09 | 61 50 72 69 6e 74 48 61 |ting ...|aPrintHa|
|00003680| 6e 64 6c 65 72 2d 3e 52 | 65 64 6f 50 61 67 65 42 |ndler->R|edoPageB|
|00003690| 72 65 61 6b 73 28 29 3b | 0d 09 65 6c 73 65 0d 09 |reaks();|..else..|
|000036a0| 7b 0d 09 09 53 68 6f 77 | 52 65 76 65 72 74 65 64 |{...Show|Reverted|
|000036b0| 28 29 3b 09 09 09 09 09 | 2f 2f 20 64 69 73 70 6c |();.....|// displ|
|000036c0| 61 79 20 74 68 65 20 76 | 69 65 77 73 20 0d 0d 09 |ay the v|iews ...|
|000036d0| 09 66 45 64 69 74 4c 6f | 63 61 74 69 6f 6e 20 3d |.fEditLo|cation =|
|000036e0| 20 47 72 69 64 43 65 6c | 6c 28 31 2c 20 31 29 3b | GridCel|l(1, 1);|
|000036f0| 09 09 09 09 2f 2f 20 64 | 65 66 61 75 6c 74 20 63 |....// d|efault c|
|00003700| 65 6c 6c 20 74 6f 20 65 | 64 69 74 20 69 73 20 41 |ell to e|dit is A|
|00003710| 31 20 0d 09 09 53 65 74 | 45 6e 74 72 79 28 66 45 |1 ...Set|Entry(fE|
|00003720| 64 69 74 4c 6f 63 61 74 | 69 6f 6e 29 3b 0d 09 09 |ditLocat|ion);...|
|00003730| 66 53 65 6c 65 63 74 69 | 6f 6e 54 79 70 65 20 3d |fSelecti|onType =|
|00003740| 20 6b 43 65 6c 6c 53 65 | 6c 65 63 74 69 6f 6e 3b | kCellSe|lection;|
|00003750| 0d 09 7d 0d 7d 0d 0d 0d | 2f 2f 2d 2d 2d 2d 2d 2d |..}.}...|//------|
|00003760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000037a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000037b0| 2d 2d 0d 2f 2f 20 54 43 | 61 6c 63 44 6f 63 75 6d |--.// TC|alcDocum|
|000037c0| 65 6e 74 3a 3a 46 72 65 | 65 3a 20 0d 2f 2f 2d 2d |ent::Fre|e: .//--|
|000037d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000037e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000037f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003820| 2d 2d 2d 2d 2d 2d 0d 54 | 43 61 6c 63 44 6f 63 75 |------.T|CalcDocu|
|00003830| 6d 65 6e 74 3a 3a 7e 54 | 43 61 6c 63 44 6f 63 75 |ment::~T|CalcDocu|
|00003840| 6d 65 6e 74 28 29 0d 7b | 0d 09 46 72 65 65 44 61 |ment().{|..FreeDa|
|00003850| 74 61 28 29 3b 0d 7d 0d | 0d 0d 2f 2f 2d 2d 2d 2d |ta();.}.|..//----|
|00003860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003870| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003880| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000038a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000038b0| 2d 2d 2d 2d 0d 2f 2f 20 | 54 43 61 6c 63 44 6f 63 |----.// |TCalcDoc|
|000038c0| 75 6d 65 6e 74 3a 3a 44 | 6f 54 6f 50 75 62 6c 69 |ument::D|oToPubli|
|000038d0| 73 68 65 72 3a 20 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |sher: ./|/-------|
|000038e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000038f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003930| 2d 0d 76 6f 69 64 20 54 | 43 61 6c 63 44 6f 63 75 |-.void T|CalcDocu|
|00003940| 6d 65 6e 74 3a 3a 44 6f | 54 6f 50 75 62 6c 69 73 |ment::Do|ToPublis|
|00003950| 68 65 72 28 54 43 65 6c | 6c 2a 20 74 68 65 43 65 |her(TCel|l* theCe|
|00003960| 6c 6c 2c 0d 09 09 09 09 | 09 09 09 09 20 20 54 50 |ll,.....|....  TP|
|00003970| 75 62 6c 69 73 68 65 72 | 2a 20 61 50 75 62 6c 69 |ublisher|* aPubli|
|00003980| 73 68 65 72 29 0d 7b 0d | 09 69 66 20 28 73 74 61 |sher).{.|.if (sta|
|00003990| 74 69 63 5f 63 61 73 74 | 3c 54 47 72 69 64 56 69 |tic_cast|<TGridVi|
|000039a0| 65 77 44 65 73 69 67 6e | 61 74 6f 72 2a 3e 28 61 |ewDesign|ator*>(a|
|000039b0| 50 75 62 6c 69 73 68 65 | 72 2d 3e 47 65 74 44 65 |Publishe|r->GetDe|
|000039c0| 73 69 67 6e 61 74 6f 72 | 28 29 29 2d 3e 43 6f 6e |signator|())->Con|
|000039d0| 74 61 69 6e 73 28 74 68 | 65 43 65 6c 6c 2d 3e 66 |tains(th|eCell->f|
|000039e0| 4c 6f 63 61 74 69 6f 6e | 29 29 0d 09 09 74 68 65 |Location|))...the|
|000039f0| 43 65 6c 6c 2d 3e 41 64 | 64 44 65 70 65 6e 64 65 |Cell->Ad|dDepende|
|00003a00| 6e 74 28 61 50 75 62 6c | 69 73 68 65 72 29 3b 0d |nt(aPubl|isher);.|
|00003a10| 7d 0d 0d 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}...//--|--------|
|00003a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003a60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2f |--------|------./|
|00003a70| 2f 20 54 43 61 6c 63 44 | 6f 63 75 6d 65 6e 74 3a |/ TCalcD|ocument:|
|00003a80| 3a 46 72 65 65 44 61 74 | 61 3a 20 0d 2f 2f 2d 2d |:FreeDat|a: .//--|
|00003a90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003aa0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ab0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ac0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ad0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ae0| 2d 2d 2d 2d 2d 2d 0d 76 | 6f 69 64 20 54 43 61 6c |------.v|oid TCal|
|00003af0| 63 44 6f 63 75 6d 65 6e | 74 3a 3a 46 72 65 65 44 |cDocumen|t::FreeD|
|00003b00| 61 74 61 28 29 0d 7b 0d | 09 66 43 65 6c 6c 73 2e |ata().{.|.fCells.|
|00003b10| 46 72 65 65 41 6c 6c 28 | 29 3b 0d 09 66 52 6f 77 |FreeAll(|);..fRow|
|00003b20| 73 2e 46 72 65 65 41 6c | 6c 28 29 3b 0d 09 66 43 |s.FreeAl|l();..fC|
|00003b30| 6f 6c 75 6d 6e 73 2e 46 | 72 65 65 41 6c 6c 28 29 |olumns.F|reeAll()|
|00003b40| 3b 0d 7d 0d 0d 0d 2f 2f | 2d 2d 2d 2d 2d 2d 2d 2d |;.}...//|--------|
|00003b50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003b60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003b70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003b80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003b90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ba0| 0d 2f 2f 20 54 43 61 6c | 63 44 6f 63 75 6d 65 6e |.// TCal|cDocumen|
|00003bb0| 74 3a 3a 44 6f 4e 65 65 | 64 44 69 73 6b 53 70 61 |t::DoNee|dDiskSpa|
|00003bc0| 63 65 3a 20 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ce: .//-|--------|
|00003bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00003c20| 76 6f 69 64 20 54 43 61 | 6c 63 44 6f 63 75 6d 65 |void TCa|lcDocume|
|00003c30| 6e 74 3a 3a 44 6f 4e 65 | 65 64 44 69 73 6b 53 70 |nt::DoNe|edDiskSp|
|00003c40| 61 63 65 28 54 46 69 6c | 65 2a 20 69 74 73 46 69 |ace(TFil|e* itsFi|
|00003c50| 6c 65 2c 0d 09 09 09 09 | 09 09 09 09 09 6c 6f 6e |le,.....|.....lon|
|00003c60| 67 26 20 64 61 74 61 46 | 6f 72 6b 42 79 74 65 73 |g& dataF|orkBytes|
|00003c70| 2c 0d 09 09 09 09 09 09 | 09 09 09 6c 6f 6e 67 26 |,.......|...long&|
|00003c80| 20 72 73 72 63 46 6f 72 | 6b 42 79 74 65 73 29 09 | rsrcFor|kBytes).|
|00003c90| 2f 2f 20 4f 76 65 72 72 | 69 64 65 0d 7b 0d 09 2f |// Overr|ide.{../|
|00003ca0| 2f 20 67 65 74 20 50 72 | 69 6e 74 20 72 65 63 6f |/ get Pr|int reco|
|00003cb0| 72 64 20 72 65 71 75 69 | 72 65 6d 65 6e 74 73 20 |rd requi|rements |
|00003cc0| 0d 09 54 45 64 69 74 69 | 6f 6e 44 6f 63 75 6d 65 |..TEditi|onDocume|
|00003cd0| 6e 74 3a 3a 44 6f 4e 65 | 65 64 44 69 73 6b 53 70 |nt::DoNe|edDiskSp|
|00003ce0| 61 63 65 28 69 74 73 46 | 69 6c 65 2c 20 64 61 74 |ace(itsF|ile, dat|
|00003cf0| 61 46 6f 72 6b 42 79 74 | 65 73 2c 20 72 73 72 63 |aForkByt|es, rsrc|
|00003d00| 46 6f 72 6b 42 79 74 65 | 73 29 3b 0d 0d 09 64 61 |ForkByte|s);...da|
|00003d10| 74 61 46 6f 72 6b 42 79 | 74 65 73 20 2b 3d 20 73 |taForkBy|tes += s|
|00003d20| 69 7a 65 6f 66 28 43 61 | 6c 63 44 6f 63 44 69 73 |izeof(Ca|lcDocDis|
|00003d30| 6b 49 6e 66 6f 29 20 2b | 20 73 69 7a 65 6f 66 28 |kInfo) +| sizeof(|
|00003d40| 52 6f 77 44 69 73 6b 49 | 6e 66 6f 29 20 2a 20 66 |RowDiskI|nfo) * f|
|00003d50| 41 6c 6c 6f 63 61 74 65 | 64 52 6f 77 73 20 2b 20 |Allocate|dRows + |
|00003d60| 73 69 7a 65 6f 66 28 43 | 6f 6c 75 6d 6e 44 69 73 |sizeof(C|olumnDis|
|00003d70| 6b 49 6e 66 6f 29 20 2a | 20 66 41 6c 6c 6f 63 61 |kInfo) *| fAlloca|
|00003d80| 74 65 64 43 6f 6c 75 6d | 6e 73 3b 0d 0d 09 66 6f |tedColum|ns;...fo|
|00003d90| 72 20 28 43 43 61 6c 63 | 43 65 6c 6c 49 74 65 72 |r (CCalc|CellIter|
|00003da0| 61 74 6f 72 20 69 74 65 | 72 28 74 68 69 73 29 3b |ator ite|r(this);|
|00003db0| 20 69 74 65 72 2e 43 75 | 72 72 65 6e 74 28 29 3b | iter.Cu|rrent();|
|00003dc0| 20 2b 2b 69 74 65 72 29 | 0d 23 69 66 20 64 65 66 | ++iter)|.#if def|
|00003dd0| 69 6e 65 64 28 5f 5f 53 | 43 5f 5f 29 20 7c 7c 20 |ined(__S|C__) || |
|00003de0| 64 65 66 69 6e 65 64 28 | 5f 5f 4d 52 43 5f 5f 29 |defined(|__MRC__)|
|00003df0| 0d 09 09 64 61 74 61 46 | 6f 72 6b 42 79 74 65 73 |...dataF|orkBytes|
|00003e00| 20 2b 3d 20 28 2a 69 74 | 65 72 29 2e 47 65 74 44 | += (*it|er).GetD|
|00003e10| 69 73 6b 53 69 7a 65 28 | 66 61 6c 73 65 29 3b 0d |iskSize(|false);.|
|00003e20| 23 65 6c 73 65 0d 09 09 | 64 61 74 61 46 6f 72 6b |#else...|dataFork|
|00003e30| 42 79 74 65 73 20 2b 3d | 20 69 74 65 72 2d 3e 47 |Bytes +=| iter->G|
|00003e40| 65 74 44 69 73 6b 53 69 | 7a 65 28 66 61 6c 73 65 |etDiskSi|ze(false|
|00003e50| 29 3b 0d 23 65 6e 64 69 | 66 0d 7d 0d 0d 23 69 66 |);.#endi|f.}..#if|
|00003e60| 20 71 41 4c 4f 45 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d | qALOE./|/-------|
|00003e70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003e90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ea0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003eb0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ec0| 2d 0d 2f 2f 20 54 43 61 | 6c 63 44 6f 63 75 6d 65 |-.// TCa|lcDocume|
|00003ed0| 6e 74 3a 3a 49 73 43 68 | 61 6e 67 65 64 3a 20 0d |nt::IsCh|anged: .|
|00003ee0| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00003ef0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003f30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 62 6f 6f 6c 20 |--------|--.bool |
|00003f40| 54 43 61 6c 63 44 6f 63 | 75 6d 65 6e 74 3a 3a 49 |TCalcDoc|ument::I|
|00003f50| 73 43 68 61 6e 67 65 64 | 28 29 0d 7b 0d 09 72 65 |sChanged|().{..re|
|00003f60| 74 75 72 6e 20 54 45 64 | 69 74 69 6f 6e 44 6f 63 |turn TEd|itionDoc|
|00003f70| 75 6d 65 6e 74 3a 3a 49 | 73 43 68 61 6e 67 65 64 |ument::I|sChanged|
|00003f80| 28 29 20 7c 7c 20 4d 4f | 44 41 64 61 70 74 61 62 |() || MO|DAdaptab|
|00003f90| 6c 65 3a 3a 49 73 43 68 | 61 6e 67 65 64 41 64 61 |le::IsCh|angedAda|
|00003fa0| 70 74 6f 72 4d 61 6e 61 | 67 65 72 28 29 3b 0d 7d |ptorMana|ger();.}|
|00003fb0| 0d 0d 23 65 6e 64 69 66 | 20 2f 2f 20 71 41 4c 4f |..#endif| // qALO|
|00003fc0| 45 0d 0d 2f 2f 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |E..//---|--------|
|00003fd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003fe0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00003ff0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004000| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 0d 2f 2f |--------|-----.//|
|00004020| 20 54 43 61 6c 63 44 6f | 63 75 6d 65 6e 74 3a 3a | TCalcDo|cument::|
|00004030| 44 6f 52 65 61 64 3a 20 | 0d 2f 2f 2d 2d 2d 2d 2d |DoRead: |.//-----|
|00004040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004070| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004080| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004090| 2d 2d 2d 0d 76 6f 69 64 | 20 54 43 61 6c 63 44 6f |---.void| TCalcDo|
|000040a0| 63 75 6d 65 6e 74 3a 3a | 44 6f 52 65 61 64 28 54 |cument::|DoRead(T|
|000040b0| 46 69 6c 65 2a 20 61 46 | 69 6c 65 2c 20 62 6f 6f |File* aF|ile, boo|
|000040c0| 6c 20 66 6f 72 50 72 69 | 6e 74 69 6e 67 29 09 2f |l forPri|nting)./|
|000040d0| 2f 20 6f 76 65 72 72 69 | 64 65 20 0d 7b 0d 09 47 |/ overri|de .{..G|
|000040e0| 72 69 64 43 6f 6f 72 64 | 69 6e 61 74 65 09 6e 6f |ridCoord|inate.no|
|000040f0| 4f 66 43 65 6c 6c 73 3b | 0d 09 47 72 69 64 43 6f |OfCells;|..GridCo|
|00004100| 6f 72 64 69 6e 61 74 65 | 09 6e 6f 4f 66 52 6f 77 |ordinate|.noOfRow|
|00004110| 73 3b 0d 09 47 72 69 64 | 43 6f 6f 72 64 69 6e 61 |s;..Grid|Coordina|
|00004120| 74 65 09 6e 6f 4f 66 43 | 6f 6c 75 6d 6e 73 3b 0d |te.noOfC|olumns;.|
|00004130| 09 54 43 65 6c 6c 2a 09 | 09 09 61 43 65 6c 6c 3b |.TCell*.|..aCell;|
|00004140| 0d 09 54 52 6f 77 2a 09 | 09 09 61 52 6f 77 3b 0d |..TRow*.|..aRow;.|
|00004150| 09 54 43 6f 6c 75 6d 6e | 2a 09 09 61 43 6f 6c 75 |.TColumn|*..aColu|
|00004160| 6d 6e 3b 0d 09 6c 6f 6e | 67 09 09 09 63 6f 75 6e |mn;..lon|g...coun|
|00004170| 74 3b 0d 0d 09 73 68 6f | 72 74 09 09 09 69 20 3d |t;...sho|rt...i =|
|00004180| 20 30 3b 0d 09 47 72 69 | 64 43 6f 6f 72 64 69 6e | 0;..Gri|dCoordin|
|00004190| 61 74 65 09 72 20 3d 20 | 30 3b 0d 09 47 72 69 64 |ate.r = |0;..Grid|
|000041a0| 43 6f 6f 72 64 69 6e 61 | 74 65 09 63 20 3d 20 30 |Coordina|te.c = 0|
|000041b0| 3b 0d 0d 09 74 72 79 0d | 09 7b 0d 23 69 66 20 71 |;...try.|.{.#if q|
|000041c0| 41 4c 4f 45 0d 09 09 2f | 2f 20 54 68 65 20 61 64 |ALOE.../|/ The ad|
|000041d0| 61 70 74 6f 72 20 6d 61 | 6e 61 67 65 72 20 69 74 |aptor ma|nager it|
|000041e0| 73 65 6c 66 20 69 73 20 | 73 74 75 66 66 65 64 20 |self is |stuffed |
|000041f0| 61 74 20 74 68 65 20 65 | 6e 64 20 6f 66 20 74 68 |at the e|nd of th|
|00004200| 65 20 66 69 6c 65 20 0d | 09 09 2f 2f 20 62 65 63 |e file .|..// bec|
|00004210| 61 75 73 65 20 61 64 61 | 70 74 6f 72 73 20 6d 61 |ause ada|ptors ma|
|00004220| 79 20 73 61 76 65 20 61 | 74 20 61 6e 79 20 74 69 |y save a|t any ti|
|00004230| 6d 65 20 69 6e 64 65 70 | 65 6e 64 65 6e 74 6c 79 |me indep|endently|
|00004240| 20 66 72 6f 6d 20 74 68 | 69 73 20 63 61 6c 6c 2e | from th|is call.|
|00004250| 0d 09 09 4d 4f 44 41 64 | 61 70 74 61 62 6c 65 3a |...MODAd|aptable:|
|00004260| 3a 44 6f 52 65 61 64 41 | 64 61 70 74 6f 72 4d 61 |:DoReadA|daptorMa|
|00004270| 6e 61 67 65 72 28 61 46 | 69 6c 65 29 3b 0d 23 65 |nager(aF|ile);.#e|
|00004280| 6e 64 69 66 0d 0d 09 09 | 54 45 64 69 74 69 6f 6e |ndif....|TEdition|
|00004290| 44 6f 63 75 6d 65 6e 74 | 3a 3a 44 6f 52 65 61 64 |Document|::DoRead|
|000042a0| 28 61 46 69 6c 65 2c 20 | 66 6f 72 50 72 69 6e 74 |(aFile, |forPrint|
|000042b0| 69 6e 67 29 3b 0d 09 09 | 2f 2f 20 47 65 74 20 69 |ing);...|// Get i|
|000042c0| 6e 66 6f 20 61 62 6f 75 | 74 20 74 68 65 20 64 6f |nfo abou|t the do|
|000042d0| 63 75 6d 65 6e 74 0d 09 | 09 7b 0d 09 09 09 43 61 |cument..|.{....Ca|
|000042e0| 6c 63 44 6f 63 44 69 73 | 6b 49 6e 66 6f 20 74 68 |lcDocDis|kInfo th|
|000042f0| 65 44 6f 63 49 6e 66 6f | 3b 0d 0d 0d 09 09 09 63 |eDocInfo|;......c|
|00004300| 6f 75 6e 74 20 3d 20 73 | 69 7a 65 6f 66 28 43 61 |ount = s|izeof(Ca|
|00004310| 6c 63 44 6f 63 44 69 73 | 6b 49 6e 66 6f 29 3b 0d |lcDocDis|kInfo);.|
|00004320| 09 09 09 3a 3a 54 68 72 | 6f 77 49 66 4f 53 45 72 |...::Thr|owIfOSEr|
|00004330| 72 5f 41 43 28 61 46 69 | 6c 65 2d 3e 52 65 61 64 |r_AC(aFi|le->Read|
|00004340| 44 61 74 61 28 26 74 68 | 65 44 6f 63 49 6e 66 6f |Data(&th|eDocInfo|
|00004350| 2c 20 63 6f 75 6e 74 29 | 29 3b 0d 0d 09 09 09 66 |, count)|);.....f|
|00004360| 44 69 6d 65 6e 73 69 6f | 6e 73 20 3d 20 74 68 65 |Dimensio|ns = the|
|00004370| 44 6f 63 49 6e 66 6f 2e | 64 69 6d 65 6e 73 69 6f |DocInfo.|dimensio|
|00004380| 6e 73 3b 0d 09 09 09 66 | 43 61 6c 63 4d 6f 64 65 |ns;....f|CalcMode|
|00004390| 20 3d 20 74 68 65 44 6f | 63 49 6e 66 6f 2e 63 61 | = theDo|cInfo.ca|
|000043a0| 6c 63 4d 6f 64 65 3b 0d | 09 09 09 6e 6f 4f 66 52 |lcMode;.|...noOfR|
|000043b0| 6f 77 73 20 3d 20 74 68 | 65 44 6f 63 49 6e 66 6f |ows = th|eDocInfo|
|000043c0| 2e 61 6c 6c 6f 63 61 74 | 65 64 52 6f 77 73 3b 0d |.allocat|edRows;.|
|000043d0| 09 09 09 6e 6f 4f 66 43 | 6f 6c 75 6d 6e 73 20 3d |...noOfC|olumns =|
|000043e0| 20 74 68 65 44 6f 63 49 | 6e 66 6f 2e 61 6c 6c 6f | theDocI|nfo.allo|
|000043f0| 63 61 74 65 64 43 6f 6c | 75 6d 6e 73 3b 0d 09 09 |catedCol|umns;...|
|00004400| 09 66 41 6c 6c 6f 63 61 | 74 65 64 43 65 6c 6c 73 |.fAlloca|tedCells|
|00004410| 20 3d 20 74 68 65 44 6f | 63 49 6e 66 6f 2e 61 6c | = theDo|cInfo.al|
|00004420| 6c 6f 63 61 74 65 64 43 | 65 6c 6c 73 3b 0d 09 09 |locatedC|ells;...|
|00004430| 09 66 53 65 6c 65 63 74 | 69 6f 6e 54 79 70 65 20 |.fSelect|ionType |
|00004440| 3d 20 6b 4e 6f 53 65 6c | 65 63 74 69 6f 6e 3b 0d |= kNoSel|ection;.|
|00004450| 09 09 09 66 45 64 69 74 | 4c 6f 63 61 74 69 6f 6e |...fEdit|Location|
|00004460| 2e 76 20 3d 20 74 68 65 | 44 6f 63 49 6e 66 6f 2e |.v = the|DocInfo.|
|00004470| 65 64 69 74 52 6f 77 3b | 0d 09 09 09 66 45 64 69 |editRow;|....fEdi|
|00004480| 74 4c 6f 63 61 74 69 6f | 6e 2e 68 20 3d 20 74 68 |tLocatio|n.h = th|
|00004490| 65 44 6f 63 49 6e 66 6f | 2e 65 64 69 74 43 6f 6c |eDocInfo|.editCol|
|000044a0| 75 6d 6e 3b 0d 0d 09 09 | 09 66 4e 6f 4f 66 52 6f |umn;....|.fNoOfRo|
|000044b0| 77 73 20 3d 20 66 44 69 | 6d 65 6e 73 69 6f 6e 73 |ws = fDi|mensions|
|000044c0| 2e 62 6f 74 74 6f 6d 20 | 2d 20 66 44 69 6d 65 6e |.bottom |- fDimen|
|000044d0| 73 69 6f 6e 73 2e 74 6f | 70 20 2b 20 31 3b 0d 09 |sions.to|p + 1;..|
|000044e0| 09 09 66 4e 6f 4f 66 43 | 6f 6c 75 6d 6e 73 20 3d |..fNoOfC|olumns =|
|000044f0| 20 66 44 69 6d 65 6e 73 | 69 6f 6e 73 2e 72 69 67 | fDimens|ions.rig|
|00004500| 68 74 20 2d 20 66 44 69 | 6d 65 6e 73 69 6f 6e 73 |ht - fDi|mensions|
|00004510| 2e 6c 65 66 74 20 2b 20 | 31 3b 0d 0d 09 09 09 2f |.left + |1;...../|
|00004520| 2f 20 53 61 76 65 20 74 | 68 65 20 6e 75 6d 62 65 |/ Save t|he numbe|
|00004530| 72 20 6f 66 20 63 65 6c | 6c 73 20 74 6f 20 62 65 |r of cel|ls to be|
|00004540| 20 72 65 61 64 2c 20 74 | 68 65 6e 20 73 65 74 20 | read, t|hen set |
|00004550| 66 41 6c 6c 6f 63 61 74 | 65 64 43 65 6c 6c 73 20 |fAllocat|edCells |
|00004560| 74 6f 0d 09 09 09 2f 2f | 20 7a 65 72 6f 2e 20 20 |to....//| zero.  |
|00004570| 41 73 20 65 61 63 68 20 | 63 65 6c 6c 20 69 73 20 |As each |cell is |
|00004580| 72 65 61 64 20 66 41 6c | 6c 6f 63 61 74 65 64 43 |read fAl|locatedC|
|00004590| 65 6c 6c 73 20 69 73 20 | 69 6e 63 72 65 6d 65 6e |ells is |incremen|
|000045a0| 74 65 64 2e 0d 09 09 09 | 2f 2f 20 57 68 65 6e 20 |ted.....|// When |
|000045b0| 77 65 27 76 65 20 66 69 | 6e 69 73 68 65 64 2c 20 |we've fi|nished, |
|000045c0| 6e 6f 4f 66 43 65 6c 6c | 73 20 6d 75 73 74 20 65 |noOfCell|s must e|
|000045d0| 71 75 61 6c 20 66 41 6c | 6c 6f 63 61 74 65 64 43 |qual fAl|locatedC|
|000045e0| 65 6c 6c 73 2e 20 0d 09 | 09 09 6e 6f 4f 66 43 65 |ells. ..|..noOfCe|
|000045f0| 6c 6c 73 20 3d 20 66 41 | 6c 6c 6f 63 61 74 65 64 |lls = fA|llocated|
|00004600| 43 65 6c 6c 73 3b 0d 09 | 09 09 44 6f 49 6e 69 74 |Cells;..|..DoInit|
|00004610| 69 61 6c 53 74 61 74 65 | 28 29 3b 09 09 09 09 2f |ialState|();..../|
|00004620| 2f 20 63 6c 65 61 72 20 | 61 6c 6c 6f 63 61 74 69 |/ clear |allocati|
|00004630| 6f 6e 20 63 6f 75 6e 74 | 73 20 0d 09 09 7d 0d 0d |on count|s ...}..|
|00004640| 09 09 66 6f 72 20 28 69 | 20 3d 20 31 3b 20 69 20 |..for (i| = 1; i |
|00004650| 3c 3d 20 6e 6f 4f 66 52 | 6f 77 73 3b 20 2b 2b 69 |<= noOfR|ows; ++i|
|00004660| 29 09 09 09 2f 2f 20 47 | 65 74 20 69 6e 66 6f 20 |)...// G|et info |
|00004670| 61 62 6f 75 74 20 65 61 | 63 68 20 72 6f 77 20 0d |about ea|ch row .|
|00004680| 09 09 7b 0d 09 09 09 63 | 6f 75 6e 74 20 3d 20 73 |..{....c|ount = s|
|00004690| 69 7a 65 6f 66 28 72 29 | 3b 0d 09 09 09 3a 3a 54 |izeof(r)|;....::T|
|000046a0| 68 72 6f 77 49 66 4f 53 | 45 72 72 5f 41 43 28 61 |hrowIfOS|Err_AC(a|
|000046b0| 46 69 6c 65 2d 3e 52 65 | 61 64 44 61 74 61 28 26 |File->Re|adData(&|
|000046c0| 72 2c 20 63 6f 75 6e 74 | 29 29 3b 0d 09 09 09 61 |r, count|));....a|
|000046d0| 52 6f 77 20 3d 20 47 65 | 74 52 6f 77 28 72 29 3b |Row = Ge|tRow(r);|
|000046e0| 0d 09 09 09 61 52 6f 77 | 2d 3e 52 65 61 64 46 72 |....aRow|->ReadFr|
|000046f0| 6f 6d 44 69 73 6b 28 61 | 46 69 6c 65 29 3b 0d 09 |omDisk(a|File);..|
|00004700| 09 7d 0d 0d 09 09 66 6f | 72 20 28 69 20 3d 20 31 |.}....fo|r (i = 1|
|00004710| 3b 20 69 20 3c 3d 20 6e | 6f 4f 66 43 6f 6c 75 6d |; i <= n|oOfColum|
|00004720| 6e 73 3b 20 2b 2b 69 29 | 09 09 2f 2f 20 47 65 74 |ns; ++i)|..// Get|
|00004730| 20 69 6e 66 6f 20 61 62 | 6f 75 74 20 65 61 63 68 | info ab|out each|
|00004740| 20 63 6f 6c 75 6d 6e 20 | 0d 09 09 7b 0d 09 09 09 | column |...{....|
|00004750| 63 6f 75 6e 74 20 3d 20 | 73 69 7a 65 6f 66 28 63 |count = |sizeof(c|
|00004760| 29 3b 0d 09 09 09 3a 3a | 54 68 72 6f 77 49 66 4f |);....::|ThrowIfO|
|00004770| 53 45 72 72 5f 41 43 28 | 61 46 69 6c 65 2d 3e 52 |SErr_AC(|aFile->R|
|00004780| 65 61 64 44 61 74 61 28 | 26 63 2c 20 63 6f 75 6e |eadData(|&c, coun|
|00004790| 74 29 29 3b 0d 09 09 09 | 61 43 6f 6c 75 6d 6e 20 |t));....|aColumn |
|000047a0| 3d 20 47 65 74 43 6f 6c | 75 6d 6e 28 63 29 3b 0d |= GetCol|umn(c);.|
|000047b0| 09 09 09 61 43 6f 6c 75 | 6d 6e 2d 3e 52 65 61 64 |...aColu|mn->Read|
|000047c0| 46 72 6f 6d 44 69 73 6b | 28 61 46 69 6c 65 29 3b |FromDisk|(aFile);|
|000047d0| 0d 09 09 7d 0d 0d 09 09 | 66 6f 72 20 28 69 20 3d |...}....|for (i =|
|000047e0| 20 31 3b 20 69 20 3c 3d | 20 6e 6f 4f 66 43 65 6c | 1; i <=| noOfCel|
|000047f0| 6c 73 3b 20 2b 2b 69 29 | 09 09 2f 2f 20 52 65 61 |ls; ++i)|..// Rea|
|00004800| 64 20 69 6e 20 74 68 65 | 20 63 65 6c 6c 73 20 0d |d in the| cells .|
|00004810| 09 09 7b 0d 09 09 09 47 | 72 69 64 43 65 6c 6c 20 |..{....G|ridCell |
|00004820| 63 6f 6f 72 64 20 3d 20 | 52 65 61 64 43 65 6c 6c |coord = |ReadCell|
|00004830| 43 6f 6f 72 64 69 6e 61 | 74 65 28 61 46 69 6c 65 |Coordina|te(aFile|
|00004840| 29 3b 0d 09 09 09 72 20 | 3d 20 63 6f 6f 72 64 2e |);....r |= coord.|
|00004850| 76 3b 0d 09 09 09 63 20 | 3d 20 63 6f 6f 72 64 2e |v;....c |= coord.|
|00004860| 68 3b 0d 09 09 09 61 43 | 65 6c 6c 20 3d 20 47 65 |h;....aC|ell = Ge|
|00004870| 74 43 65 6c 6c 28 63 6f | 6f 72 64 29 3b 0d 09 09 |tCell(co|ord);...|
|00004880| 09 61 43 65 6c 6c 2d 3e | 52 65 61 64 46 72 6f 6d |.aCell->|ReadFrom|
|00004890| 44 69 73 6b 28 61 46 69 | 6c 65 29 3b 0d 09 09 7d |Disk(aFi|le);...}|
|000048a0| 0d 0d 23 69 66 20 71 44 | 65 62 75 67 0d 09 09 69 |..#if qD|ebug...i|
|000048b0| 66 20 28 67 49 6e 74 65 | 6e 73 65 44 65 62 75 67 |f (gInte|nseDebug|
|000048c0| 67 69 6e 67 29 0d 09 09 | 7b 0d 09 09 09 50 72 6f |ging)...|{....Pro|
|000048d0| 67 72 61 6d 42 72 65 61 | 6b 5f 41 43 28 22 54 43 |gramBrea|k_AC("TC|
|000048e0| 61 6c 63 44 6f 63 75 6d | 65 6e 74 2e 44 6f 52 65 |alcDocum|ent.DoRe|
|000048f0| 61 64 3a 20 6e 6f 4f 66 | 43 65 6c 6c 73 3d 25 64 |ad: noOf|Cells=%d|
|00004900| 22 2c 20 6e 6f 4f 66 43 | 65 6c 6c 73 29 3b 0d 09 |", noOfC|ells);..|
|00004910| 09 09 69 66 20 28 6e 6f | 4f 66 43 65 6c 6c 73 20 |..if (no|OfCells |
|00004920| 21 3d 20 66 41 6c 6c 6f | 63 61 74 65 64 43 65 6c |!= fAllo|catedCel|
|00004930| 6c 73 29 0d 09 09 09 7b | 0d 09 09 09 09 50 72 6f |ls)....{|.....Pro|
|00004940| 67 72 61 6d 42 72 65 61 | 6b 5f 41 43 28 22 54 43 |gramBrea|k_AC("TC|
|00004950| 61 6c 63 44 6f 63 75 6d | 65 6e 74 2e 44 6f 52 65 |alcDocum|ent.DoRe|
|00004960| 61 64 3a 20 57 72 6f 6e | 67 20 6e 75 6d 62 65 72 |ad: Wron|g number|
|00004970| 20 6f 66 20 63 65 6c 6c | 73 2e 20 20 6e 6f 4f 66 | of cell|s.  noOf|
|00004980| 43 65 6c 6c 73 3d 25 64 | 2c 20 66 41 6c 6c 6f 63 |Cells=%d|, fAlloc|
|00004990| 61 74 65 64 43 65 6c 6c | 73 3d 25 64 22 2c 20 6e |atedCell|s=%d", n|
|000049a0| 6f 4f 66 43 65 6c 6c 73 | 2c 20 66 41 6c 6c 6f 63 |oOfCells|, fAlloc|
|000049b0| 61 74 65 64 43 65 6c 6c | 73 29 3b 0d 09 09 09 09 |atedCell|s);.....|
|000049c0| 50 72 6f 67 72 61 6d 42 | 72 65 61 6b 5f 41 43 28 |ProgramB|reak_AC(|
|000049d0| 22 22 29 3b 0d 09 09 09 | 7d 0d 09 09 7d 0d 23 65 |"");....|}...}.#e|
|000049e0| 6e 64 69 66 0d 09 7d 0d | 09 63 61 74 63 68 28 43 |ndif..}.|.catch(C|
|000049f0| 45 78 63 65 70 74 69 6f | 6e 5f 41 43 26 29 0d 09 |Exceptio|n_AC&)..|
|00004a00| 7b 0d 09 09 2f 2f 20 4f | 68 20 42 6f 79 20 61 72 |{...// O|h Boy ar|
|00004a10| 65 20 77 65 20 69 6e 20 | 74 72 6f 75 62 6c 65 20 |e we in |trouble |
|00004a20| 0d 09 09 2f 2f 20 4e 65 | 65 64 20 74 6f 20 73 65 |...// Ne|ed to se|
|00004a30| 74 20 62 61 63 6b 20 72 | 6f 77 73 20 61 6e 64 20 |t back r|ows and |
|00004a40| 63 6f 6c 75 6d 6e 73 20 | 74 6f 20 72 65 66 6c 65 |columns |to refle|
|00004a50| 63 74 20 74 68 65 20 6e | 75 6d 62 65 72 20 72 65 |ct the n|umber re|
|00004a60| 61 64 20 69 6e 20 73 6f | 0d 09 09 2f 2f 20 74 68 |ad in so|...// th|
|00004a70| 65 20 66 72 65 65 64 61 | 74 61 20 72 6f 75 74 69 |e freeda|ta routi|
|00004a80| 6e 65 20 28 77 68 69 63 | 68 20 77 69 6c 6c 20 65 |ne (whic|h will e|
|00004a90| 76 65 6e 74 75 61 6c 6c | 79 20 62 65 20 63 61 6c |ventuall|y be cal|
|00004aa0| 6c 65 64 20 62 79 20 6f | 74 68 65 72 0d 09 09 2f |led by o|ther.../|
|00004ab0| 2f 20 66 61 69 6c 75 72 | 65 20 68 61 6e 64 6c 65 |/ failur|e handle|
|00004ac0| 72 73 20 6f 6e 20 74 68 | 65 20 73 74 61 63 6b 29 |rs on th|e stack)|
|00004ad0| 20 77 6f 6e 27 74 20 74 | 72 79 20 74 6f 20 66 72 | won't t|ry to fr|
|00004ae0| 65 65 20 75 6e 61 6c 6c | 6f 63 61 74 65 64 20 6f |ee unall|ocated o|
|00004af0| 62 6a 65 63 74 73 0d 0d | 09 09 69 66 20 28 21 63 |bjects..|..if (!c|
|00004b00| 29 0d 09 09 7b 0d 09 09 | 09 2f 2f 20 57 65 20 64 |)...{...|.// We d|
|00004b10| 69 65 64 20 77 68 69 6c | 65 20 72 65 61 64 69 6e |ied whil|e readin|
|00004b20| 67 20 74 68 65 20 72 6f | 77 73 20 69 6e 0d 09 09 |g the ro|ws in...|
|00004b30| 09 66 4e 6f 4f 66 52 6f | 77 73 20 3d 20 72 20 2d |.fNoOfRo|ws = r -|
|00004b40| 20 31 3b 0d 09 09 09 66 | 4e 6f 4f 66 43 6f 6c 75 | 1;....f|NoOfColu|
|00004b50| 6d 6e 73 20 3d 20 30 3b | 0d 09 09 7d 0d 09 09 65 |mns = 0;|...}...e|
|00004b60| 6c 73 65 20 69 66 20 28 | 21 69 29 0d 09 09 7b 0d |lse if (|!i)...{.|
|00004b70| 09 09 09 2f 2f 20 44 69 | 65 64 20 69 6e 20 74 68 |...// Di|ed in th|
|00004b80| 65 20 63 6f 6c 75 6d 6e | 73 20 0d 09 09 09 66 4e |e column|s ....fN|
|00004b90| 6f 4f 66 43 6f 6c 75 6d | 6e 73 20 3d 20 63 20 2d |oOfColum|ns = c -|
|00004ba0| 20 31 3b 0d 09 09 7d 0d | 0d 09 09 74 68 72 6f 77 | 1;...}.|...throw|
|00004bb0| 3b 09 09 09 09 09 09 09 | 2f 2f 20 74 65 6c 6c 20 |;.......|// tell |
|00004bc0| 65 76 65 72 79 6f 6e 65 | 20 65 6c 73 65 20 77 65 |everyone| else we|
|00004bd0| 20 64 69 65 64 20 74 6f | 6f 2e 0d 09 7d 0d 7d 0d | died to|o...}.}.|
|00004be0| 0d 0d 2f 2f 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..//----|--------|
|00004bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 0d 2f 2f 20 |--------|----.// |
|00004c40| 54 43 61 6c 63 44 6f 63 | 75 6d 65 6e 74 3a 3a 44 |TCalcDoc|ument::D|
|00004c50| 6f 57 72 69 74 65 3a 20 | 0d 2f 2f 2d 2d 2d 2d 2d |oWrite: |.//-----|
|00004c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004c90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004ca0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00004cb0| 2d 2d 2d 0d 76 6f 69 64 | 20 54 43 61 6c 63 44 6f |---.void| TCalcDo|
|00004cc0| 63 75 6d 65 6e 74 3a 3a | 44 6f 57 72 69 74 65 28 |cument::|DoWrite(|
|00004cd0| 54 46 69 6c 65 2a 20 61 | 46 69 6c 65 2c 20 62 6f |TFile* a|File, bo|
|00004ce0| 6f 6c 20 6d 61 6b 69 6e | 67 43 6f 70 79 29 09 2f |ol makin|gCopy)./|
|00004cf0| 2f 20 4f 76 65 72 72 69 | 64 65 0d 7b 0d 09 54 45 |/ Overri|de.{..TE|
|00004d00| 64 69 74 69 6f 6e 44 6f | 63 75 6d 65 6e 74 3a 3a |ditionDo|cument::|
|00004d10| 44 6f 57 72 69 74 65 28 | 61 46 69 6c 65 2c 20 6d |DoWrite(|aFile, m|
|00004d20| 61 6b 69 6e 67 43 6f 70 | 79 29 3b 0d 0d 09 69 66 |akingCop|y);...if|
|00004d30| 20 28 61 46 69 6c 65 29 | 0d 09 7b 0d 09 09 2f 2f | (aFile)|..{...//|
|00004d40| 20 57 72 69 74 65 20 69 | 6e 66 6f 20 61 62 6f 75 | Write i|nfo abou|
|00004d50| 74 20 74 68 65 20 64 6f | 63 75 6d 65 6e 74 20 0d |t the do|cument .|
|00004d60| 09 09 7b 0d 09 09 09 43 | 61 6c 63 44 6f 63 44 69 |..{....C|alcDocDi|
|00004d70| 73 6b 49 6e 66 6f 20 74 | 68 65 44 6f 63 49 6e 66 |skInfo t|heDocInf|
|00004d80| 6f 3b 0d 09 09 09 6c 6f | 6e 67 20 63 6f 75 6e 74 |o;....lo|ng count|
|00004d90| 3b 0d 0d 09 09 09 74 68 | 65 44 6f 63 49 6e 66 6f |;.....th|eDocInfo|
|00004da0| 2e 64 69 6d 65 6e 73 69 | 6f 6e 73 20 3d 20 66 44 |.dimensi|ons = fD|
|00004db0| 69 6d 65 6e 73 69 6f 6e | 73 3b 0d 09 09 09 74 68 |imension|s;....th|
|00004dc0| 65 44 6f 63 49 6e 66 6f | 2e 63 61 6c 63 4d 6f 64 |eDocInfo|.calcMod|
|00004dd0| 65 20 3d 20 66 43 61 6c | 63 4d 6f 64 65 3b 0d 09 |e = fCal|cMode;..|
|00004de0| 09 09 74 68 65 44 6f 63 | 49 6e 66 6f 2e 61 6c 6c |..theDoc|Info.all|
|00004df0| 6f 63 61 74 65 64 52 6f | 77 73 20 3d 20 66 41 6c |ocatedRo|ws = fAl|
|00004e00| 6c 6f 63 61 74 65 64 52 | 6f 77 73 3b 0d 09 09 09 |locatedR|ows;....|
|00004e10| 74 68 65 44 6f 63 49 6e | 66 6f 2e 61 6c 6c 6f 63 |theDocIn|fo.alloc|
|00004e20| 61 74 65 64 43 6f 6c 75 | 6d 6e 73 20 3d 20 66 41 |atedColu|mns = fA|
|00004e30| 6c 6c 6f 63 61 74 65 64 | 43 6f 6c 75 6d 6e 73 3b |llocated|Columns;|
|00004e40| 0d 09 09 09 74 68 65 44 | 6f 63 49 6e 66 6f 2e 61 |....theD|ocInfo.a|
|00004e50| 6c 6c 6f 63 61 74 65 64 | 43 65 6c 6c 73 20 3d 20 |llocated|Cells = |
|00004e60| 66 41 6c 6c 6f 63 61 74 | 65 64 43 65 6c 6c 73 3b |fAllocat|edCells;|
|00004e70| 0d 09 09 09 74 68 65 44 | 6f 63 49 6e 66 6f 2e 73 |....theD|ocInfo.s|
|00004e80| 65 6c 65 63 74 69 6f 6e | 54 79 70 65 20 3d 20 6b |election|Type = k|
|00004e90| 4e 6f 53 65 6c 65 63 74 | 69 6f 6e 3b 0d 09 09 09 |NoSelect|ion;....|
|00004ea0| 74 68 65 44 6f 63 49 6e | 66 6f 2e 65 64 69 74 52 |theDocIn|fo.editR|
|00004eb0| 6f 77 20 3d 20 66 45 64 | 69 74 4c 6f 63 61 74 69 |ow = fEd|itLocati|
|00004ec0| 6f 6e 2e 76 3b 0d 09 09 | 09 74 68 65 44 6f 63 49 |on.v;...|.theDocI|
|00004ed0| 6e 66 6f 2e 65 64 69 74 | 43 6f 6c 75 6d 6e 20 3d |nfo.edit|Column =|
|00004ee0| 20 66 45 64 69 74 4c 6f | 63 61 74 69 6f 6e 2e 68 | fEditLo|cation.h|
|00004ef0| 3b 0d 09 09 09 63 6f 75 | 6e 74 20 3d 20 73 69 7a |;....cou|nt = siz|
|00004f00| 65 6f 66 28 43 61 6c 63 | 44 6f 63 44 69 73 6b 49 |eof(Calc|DocDiskI|
|00004f10| 6e 66 6f 29 3b 0d 09 09 | 09 3a 3a 54 68 72 6f 77 |nfo);...|.::Throw|
|00004f20| 49 66 4f 53 45 72 72 5f | 41 43 28 61 46 69 6c 65 |IfOSErr_|AC(aFile|
|00004f30| 2d 3e 57 72 69 74 65 44 | 61 74 61 28 26 74 68 65 |->WriteD|ata(&the|
|00004f40| 44 6f 63 49 6e 66 6f 2c | 20 63 6f 75 6e 74 29 29 |DocInfo,| count))|
|00004f50| 3b 0d 09 09 7d 0d 0d 09 | 09 7b 0d 09 09 09 2f 2f |;...}...|.{....//|
|00004f60| 20 57 72 69 74 65 20 69 | 6e 66 6f 20 61 62 6f 75 | Write i|nfo abou|
|00004f70| 74 20 65 61 63 68 20 72 | 6f 77 20 0d 09 09 09 66 |t each r|ow ....f|
|00004f80| 6f 72 20 28 43 43 61 6c | 63 52 6f 77 49 74 65 72 |or (CCal|cRowIter|
|00004f90| 61 74 6f 72 20 69 74 65 | 72 28 74 68 69 73 29 3b |ator ite|r(this);|
|00004fa0| 20 69 74 65 72 2e 43 75 | 72 72 65 6e 74 28 29 3b | iter.Cu|rrent();|
|00004fb0| 20 2b 2b 69 74 65 72 29 | 0d 23 69 66 20 64 65 66 | ++iter)|.#if def|
|00004fc0| 69 6e 65 64 28 5f 5f 53 | 43 5f 5f 29 20 7c 7c 20 |ined(__S|C__) || |
|00004fd0| 64 65 66 69 6e 65 64 28 | 5f 5f 4d 52 43 5f 5f 29 |defined(|__MRC__)|
|00004fe0| 0d 09 09 09 09 28 2a 69 | 74 65 72 29 2e 57 72 69 |.....(*i|ter).Wri|
|00004ff0| 74 65 54 6f 44 69 73 6b | 28 61 46 69 6c 65 29 3b |teToDisk|(aFile);|
|00005000| 09 09 2f 2f 20 45 61 63 | 68 45 78 69 73 74 69 6e |..// Eac|hExistin|
|00005010| 67 52 6f 77 44 6f 28 57 | 72 69 74 65 52 6f 77 29 |gRowDo(W|riteRow)|
|00005020| 3b 0d 23 65 6c 73 65 0d | 09 09 09 09 69 74 65 72 |;.#else.|....iter|
|00005030| 2d 3e 57 72 69 74 65 54 | 6f 44 69 73 6b 28 61 46 |->WriteT|oDisk(aF|
|00005040| 69 6c 65 29 3b 09 09 2f | 2f 20 45 61 63 68 45 78 |ile);../|/ EachEx|
|00005050| 69 73 74 69 6e 67 52 6f | 77 44 6f 28 57 72 69 74 |istingRo|wDo(Writ|
|00005060| 65 52 6f 77 29 3b 0d 23 | 65 6e 64 69 66 0d 09 09 |eRow);.#|endif...|
|00005070| 7d 0d 0d 09 09 7b 0d 09 | 09 09 2f 2f 20 57 72 69 |}....{..|..// Wri|
|00005080| 74 65 20 69 6e 66 6f 20 | 61 62 6f 75 74 20 65 61 |te info |about ea|
|00005090| 63 68 20 63 6f 6c 75 6d | 6e 20 0d 09 09 09 66 6f |ch colum|n ....fo|
|000050a0| 72 20 28 43 43 61 6c 63 | 43 6f 6c 75 6d 6e 49 74 |r (CCalc|ColumnIt|
|000050b0| 65 72 61 74 6f 72 20 69 | 74 65 72 28 74 68 69 73 |erator i|ter(this|
|000050c0| 29 3b 20 69 74 65 72 2e | 43 75 72 72 65 6e 74 28 |); iter.|Current(|
|000050d0| 29 3b 20 2b 2b 69 74 65 | 72 29 0d 09 09 09 2f 2f |); ++ite|r)....//|
|000050e0| 20 61 43 6f 6c 75 6d 6e | 2d 3e 66 57 69 64 74 68 | aColumn|->fWidth|
|000050f0| 20 3d 20 66 43 6f 6c 75 | 6d 6e 73 56 69 65 77 2d | = fColu|mnsView-|
|00005100| 3e 47 65 74 43 6f 6c 57 | 69 64 74 68 28 61 43 65 |>GetColW|idth(aCe|
|00005110| 6c 6c 2e 68 29 3b 20 0d | 23 69 66 20 64 65 66 69 |ll.h); .|#if defi|
|00005120| 6e 65 64 28 5f 5f 53 43 | 5f 5f 29 20 7c 7c 20 64 |ned(__SC|__) || d|
|00005130| 65 66 69 6e 65 64 28 5f | 5f 4d 52 43 5f 5f 29 0d |efined(_|_MRC__).|
|00005140| 09 09 09 09 28 2a 69 74 | 65 72 29 2e 57 72 69 74 |....(*it|er).Writ|
|00005150| 65 54 6f 44 69 73 6b 28 | 61 46 69 6c 65 29 3b 0d |eToDisk(|aFile);.|
|00005160| 23 65 6c 73 65 0d 09 09 | 09 09 69 74 65 72 2d 3e |#else...|..iter->|
|00005170| 57 72 69 74 65 54 6f 44 | 69 73 6b 28 61 46 69 6c |WriteToD|isk(aFil|
|00005180| 65 29 3b 0d 23 65 6e 64 | 69 66 0d 09 09 09 2f 2f |e);.#end|if....//|
|00005190| 20 74 68 69 73 20 77 61 | 73 20 22 45 61 63 68 45 | this wa|s "EachE|
|000051a0| 78 69 73 74 69 6e 67 43 | 6f 6c 75 6d 6e 44 6f 28 |xistingC|olumnDo(|
|000051b0| 57 72 69 74 65 43 6f 6c | 75 6d 6e 29 3b 09 22 0d |WriteCol|umn);.".|
|000051c0| 09 09 7d 0d 0d 09 09 47 | 72 69 64 43 6f 6f 72 64 |..}....G|ridCoord|
|000051d0| 69 6e 61 74 65 20 63 65 | 6c 6c 73 57 72 69 74 74 |inate ce|llsWritt|
|000051e0| 65 6e 20 3d 20 30 3b 0d | 09 09 7b 0d 09 09 09 2f |en = 0;.|..{..../|
|000051f0| 2f 20 57 72 69 74 65 20 | 6f 75 74 20 74 68 65 20 |/ Write |out the |
|00005200| 63 65 6c 6c 73 0d 09 09 | 09 66 6f 72 20 28 43 45 |cells...|.for (CE|
|00005210| 78 69 73 74 69 6e 67 43 | 61 6c 63 43 65 6c 6c 49 |xistingC|alcCellI|
|00005220| 74 65 72 61 74 6f 72 20 | 69 74 65 72 28 74 68 69 |terator |iter(thi|
|00005230| 73 29 3b 20 69 74 65 72 | 2e 43 75 72 72 65 6e 74 |s); iter|.Current|
|00005240| 28 29 3b 20 2b 2b 69 74 | 65 72 29 0d 09 09 09 7b |(); ++it|er)....{|
|00005250| 0d 23 69 66 20 64 65 66 | 69 6e 65 64 28 5f 5f 53 |.#if def|ined(__S|
|00005260| 43 5f 5f 29 20 7c 7c 20 | 64 65 66 69 6e 65 64 28 |C__) || |defined(|
|00005270| 5f 5f 4d 52 43 5f 5f 29 | 0d 09 09 09 09 28 2a 69 |__MRC__)|.....(*i|
|00005280| 74 65 72 29 2e 57 72 69 | 74 65 54 6f 44 69 73 6b |ter).Wri|teToDisk|
|00005290| 28 61 46 69 6c 65 29 3b | 0d 23 65 6c 73 65 0d 09 |(aFile);|.#else..|
|000052a0| 09 09 09 69 74 65 72 2d | 3e 57 72 69 74 65 54 6f |...iter-|>WriteTo|
|000052b0| 44 69 73 6b 28 61 46 69 | 6c 65 29 3b 0d 23 65 6e |Disk(aFi|le);.#en|
|000052c0| 64 69 66 0d 09 09 09 09 | 2b 2b 63 65 6c 6c 73 57 |dif.....|++cellsW|
|000052d0| 72 69 74 74 65 6e 3b 0d | 09 09 09 7d 0d 09 09 09 |ritten;.|...}....|
|000052e0| 2f 2f 20 45 61 63 68 45 | 78 69 73 74 69 6e 67 43 |// EachE|xistingC|
|000052f0| 65 6c 6c 44 6f 28 57 72 | 69 74 65 43 65 6c 6c 29 |ellDo(Wr|iteCell)|
|00005300| 3b 09 09 09 20 0d 09 09 | 7d 0d 0d 23 69 66 20 71 |;... ...|}..#if q|
|00005310| 44 65 62 75 67 0d 09 09 | 69 66 20 28 63 65 6c 6c |Debug...|if (cell|
|00005320| 73 57 72 69 74 74 65 6e | 20 21 3d 20 66 41 6c 6c |sWritten| != fAll|
|00005330| 6f 63 61 74 65 64 43 65 | 6c 6c 73 29 0d 09 09 09 |ocatedCe|lls)....|
|00005340| 50 72 6f 67 72 61 6d 42 | 72 65 61 6b 5f 41 43 28 |ProgramB|reak_AC(|
|00005350| 22 44 6f 57 72 69 74 65 | 3a 20 49 6e 63 6f 72 72 |"DoWrite|: Incorr|
|00005360| 65 63 74 20 6e 75 6d 62 | 65 72 20 6f 66 20 63 65 |ect numb|er of ce|
|00005370| 6c 6c 73 20 77 72 69 74 | 74 65 6e 22 29 3b 0d 23 |lls writ|ten");.#|
|00005380| 65 6e 64 69 66 0d 09 7d | 0d 0d 23 69 66 20 71 41 |endif..}|..#if qA|
|00005390| 4c 4f 45 0d 09 2f 2f 20 | 53 61 76 65 20 61 64 61 |LOE..// |Save ada|
|000053a0| 70 74 6f 72 20 6d 61 6e | 61 67 65 72 20 61 74 20 |ptor man|ager at |
|000053b0| 65 6e 64 20 6f 66 20 66 | 69 6c 65 0d 09 4d 4f 44 |end of f|ile..MOD|
|000053c0| 41 64 61 70 74 61 62 6c | 65 3a 3a 44 6f 57 72 69 |Adaptabl|e::DoWri|
|000053d0| 74 65 41 64 61 70 74 6f | 72 4d 61 6e 61 67 65 72 |teAdapto|rManager|
|000053e0| 28 61 46 69 6c 65 29 3b | 0d 23 65 6e 64 69 66 0d |(aFile);|.#endif.|
|000053f0| 7d 0d 0d 0d 2f 2f 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}...//--|--------|
|00005400| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005410| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005420| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005430| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005440| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 2f |--------|------./|
|00005450| 2f 20 54 43 61 6c 63 44 | 6f 63 75 6d 65 6e 74 3a |/ TCalcD|ocument:|
|00005460| 3a 44 6f 53 65 74 75 70 | 4d 65 6e 75 73 3a 20 0d |:DoSetup|Menus: .|
|00005470| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00005480| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005490| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000054a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000054b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000054c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 76 6f 69 64 20 |--------|--.void |
|000054d0| 54 43 61 6c 63 44 6f 63 | 75 6d 65 6e 74 3a 3a 44 |TCalcDoc|ument::D|
|000054e0| 6f 53 65 74 75 70 4d 65 | 6e 75 73 28 29 09 2f 2f |oSetupMe|nus().//|
|000054f0| 20 6f 76 65 72 72 69 64 | 65 20 0d 0d 7b 0d 09 54 | overrid|e ..{..T|
|00005500| 45 64 69 74 69 6f 6e 44 | 6f 63 75 6d 65 6e 74 3a |EditionD|ocument:|
|00005510| 3a 44 6f 53 65 74 75 70 | 4d 65 6e 75 73 28 29 3b |:DoSetup|Menus();|
|00005520| 0d 0d 09 45 6e 61 62 6c | 65 28 63 52 65 63 61 6c |...Enabl|e(cRecal|
|00005530| 63 75 6c 61 74 65 2c 20 | 74 72 75 65 29 3b 0d 09 |culate, |true);..|
|00005540| 45 6e 61 62 6c 65 43 68 | 65 63 6b 28 63 41 75 74 |EnableCh|eck(cAut|
|00005550| 6f 43 61 6c 63 2c 20 74 | 72 75 65 2c 20 49 73 41 |oCalc, t|rue, IsA|
|00005560| 75 74 6f 43 61 6c 63 28 | 29 29 3b 0d 09 45 6e 61 |utoCalc(|));..Ena|
|00005570| 62 6c 65 43 68 65 63 6b | 28 63 4d 61 6e 75 61 6c |bleCheck|(cManual|
|00005580| 43 61 6c 63 2c 20 74 72 | 75 65 2c 20 66 43 61 6c |Calc, tr|ue, fCal|
|00005590| 63 4d 6f 64 65 20 3d 3d | 20 6b 4d 61 6e 75 61 6c |cMode ==| kManual|
|000055a0| 29 3b 0d 0d 09 69 66 20 | 28 66 43 6f 6c 75 6d 6e |);...if |(fColumn|
|000055b0| 49 73 53 65 6c 65 63 74 | 65 64 29 0d 09 7b 0d 09 |IsSelect|ed)..{..|
|000055c0| 09 46 6f 72 6d 61 74 52 | 65 63 6f 72 64 20 63 6f |.FormatR|ecord co|
|000055d0| 6c 75 6d 6e 46 6f 72 6d | 61 74 20 3d 20 43 6f 6c |lumnForm|at = Col|
|000055e0| 75 6d 6e 45 78 69 73 74 | 73 28 66 45 64 69 74 4c |umnExist|s(fEditL|
|000055f0| 6f 63 61 74 69 6f 6e 2e | 68 29 20 3f 0d 09 09 09 |ocation.|h) ?....|
|00005600| 09 09 09 09 09 09 47 65 | 74 43 6f 6c 75 6d 6e 28 |......Ge|tColumn(|
|00005610| 66 45 64 69 74 4c 6f 63 | 61 74 69 6f 6e 2e 68 29 |fEditLoc|ation.h)|
|00005620| 2d 3e 66 46 6f 72 6d 61 | 74 20 3a 20 67 44 65 66 |->fForma|t : gDef|
|00005630| 61 75 6c 74 46 6f 72 6d | 61 74 3b 0d 0d 09 09 73 |aultForm|at;....s|
|00005640| 68 6f 72 74 20 6a 75 73 | 74 69 66 69 63 61 74 69 |hort jus|tificati|
|00005650| 6f 6e 20 3d 20 63 6f 6c | 75 6d 6e 46 6f 72 6d 61 |on = col|umnForma|
|00005660| 74 2e 66 4a 75 73 74 69 | 66 69 63 61 74 69 6f 6e |t.fJusti|fication|
|00005670| 3b 0d 09 09 45 6e 61 62 | 6c 65 43 68 65 63 6b 28 |;...Enab|leCheck(|
|00005680| 63 53 79 73 74 65 6d 4a | 75 73 74 69 66 79 2c 20 |cSystemJ|ustify, |
|00005690| 74 72 75 65 2c 20 6a 75 | 73 74 69 66 69 63 61 74 |true, ju|stificat|
|000056a0| 69 6f 6e 20 3d 3d 20 74 | 65 46 6c 75 73 68 44 65 |ion == t|eFlushDe|
|000056b0| 66 61 75 6c 74 29 3b 0d | 09 09 45 6e 61 62 6c 65 |fault);.|..Enable|
|000056c0| 43 68 65 63 6b 28 63 46 | 6f 72 63 65 4c 65 66 74 |Check(cF|orceLeft|
|000056d0| 4a 75 73 74 69 66 79 2c | 20 74 72 75 65 2c 20 6a |Justify,| true, j|
|000056e0| 75 73 74 69 66 69 63 61 | 74 69 6f 6e 20 3d 3d 20 |ustifica|tion == |
|000056f0| 74 65 46 6c 75 73 68 4c | 65 66 74 29 3b 0d 09 09 |teFlushL|eft);...|
|00005700| 45 6e 61 62 6c 65 43 68 | 65 63 6b 28 63 52 69 67 |EnableCh|eck(cRig|
|00005710| 68 74 4a 75 73 74 69 66 | 79 2c 20 74 72 75 65 2c |htJustif|y, true,|
|00005720| 20 6a 75 73 74 69 66 69 | 63 61 74 69 6f 6e 20 3d | justifi|cation =|
|00005730| 3d 20 74 65 46 6c 75 73 | 68 52 69 67 68 74 29 3b |= teFlus|hRight);|
|00005740| 0d 09 09 45 6e 61 62 6c | 65 43 68 65 63 6b 28 63 |...Enabl|eCheck(c|
|00005750| 43 65 6e 74 65 72 2c 20 | 74 72 75 65 2c 20 6a 75 |Center, |true, ju|
|00005760| 73 74 69 66 69 63 61 74 | 69 6f 6e 20 3d 3d 20 74 |stificat|ion == t|
|00005770| 65 43 65 6e 74 65 72 29 | 3b 0d 0d 09 09 54 79 70 |eCenter)|;....Typ|
|00005780| 65 4f 66 53 74 79 6c 65 | 20 74 68 65 53 74 79 6c |eOfStyle| theStyl|
|00005790| 65 20 3d 20 63 6f 6c 75 | 6d 6e 46 6f 72 6d 61 74 |e = colu|mnFormat|
|000057a0| 2e 66 53 74 79 6c 65 3b | 0d 09 09 45 6e 61 62 6c |.fStyle;|...Enabl|
|000057b0| 65 43 68 65 63 6b 28 63 | 47 65 6e 65 72 61 6c 2c |eCheck(c|General,|
|000057c0| 20 74 72 75 65 2c 20 74 | 68 65 53 74 79 6c 65 20 | true, t|heStyle |
|000057d0| 3d 3d 20 6b 47 65 6e 65 | 72 61 6c 29 3b 0d 09 09 |== kGene|ral);...|
|000057e0| 45 6e 61 62 6c 65 43 68 | 65 63 6b 28 63 44 65 63 |EnableCh|eck(cDec|
|000057f0| 69 6d 61 6c 2c 20 74 72 | 75 65 2c 20 74 68 65 53 |imal, tr|ue, theS|
|00005800| 74 79 6c 65 20 3d 3d 20 | 6b 44 65 63 69 6d 61 6c |tyle == |kDecimal|
|00005810| 53 74 79 6c 65 29 3b 0d | 09 09 45 6e 61 62 6c 65 |Style);.|..Enable|
|00005820| 43 68 65 63 6b 28 63 4e | 6f 44 65 63 69 6d 61 6c |Check(cN|oDecimal|
|00005830| 2c 20 74 72 75 65 2c 20 | 74 68 65 53 74 79 6c 65 |, true, |theStyle|
|00005840| 20 3d 3d 20 6b 4e 6f 44 | 65 63 69 6d 61 6c 29 3b | == kNoD|ecimal);|
|00005850| 0d 09 09 45 6e 61 62 6c | 65 43 68 65 63 6b 28 63 |...Enabl|eCheck(c|
|00005860| 53 63 69 65 6e 74 69 66 | 69 63 2c 20 74 72 75 65 |Scientif|ic, true|
|00005870| 2c 20 74 68 65 53 74 79 | 6c 65 20 3d 3d 20 6b 53 |, theSty|le == kS|
|00005880| 63 69 65 6e 74 69 66 69 | 63 29 3b 0d 09 7d 0d 09 |cientifi|c);..}..|
|00005890| 65 6c 73 65 0d 09 7b 0d | 09 09 45 6e 61 62 6c 65 |else..{.|..Enable|
|000058a0| 28 63 53 79 73 74 65 6d | 4a 75 73 74 69 66 79 2c |(cSystem|Justify,|
|000058b0| 20 66 61 6c 73 65 29 3b | 0d 09 09 45 6e 61 62 6c | false);|...Enabl|
|000058c0| 65 28 63 46 6f 72 63 65 | 4c 65 66 74 4a 75 73 74 |e(cForce|LeftJust|
|000058d0| 69 66 79 2c 20 66 61 6c | 73 65 29 3b 0d 09 09 45 |ify, fal|se);...E|
|000058e0| 6e 61 62 6c 65 28 63 52 | 69 67 68 74 4a 75 73 74 |nable(cR|ightJust|
|000058f0| 69 66 79 2c 20 66 61 6c | 73 65 29 3b 0d 09 09 45 |ify, fal|se);...E|
|00005900| 6e 61 62 6c 65 28 63 43 | 65 6e 74 65 72 2c 20 66 |nable(cC|enter, f|
|00005910| 61 6c 73 65 29 3b 0d 0d | 09 09 45 6e 61 62 6c 65 |alse);..|..Enable|
|00005920| 28 63 47 65 6e 65 72 61 | 6c 2c 20 66 61 6c 73 65 |(cGenera|l, false|
|00005930| 29 3b 0d 09 09 45 6e 61 | 62 6c 65 28 63 44 65 63 |);...Ena|ble(cDec|
|00005940| 69 6d 61 6c 2c 20 66 61 | 6c 73 65 29 3b 0d 09 09 |imal, fa|lse);...|
|00005950| 45 6e 61 62 6c 65 28 63 | 4e 6f 44 65 63 69 6d 61 |Enable(c|NoDecima|
|00005960| 6c 2c 20 66 61 6c 73 65 | 29 3b 0d 09 09 45 6e 61 |l, false|);...Ena|
|00005970| 62 6c 65 28 63 53 63 69 | 65 6e 74 69 66 69 63 2c |ble(cSci|entific,|
|00005980| 20 66 61 6c 73 65 29 3b | 0d 09 7d 0d 0d 7d 0d 0d | false);|..}..}..|
|00005990| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|000059a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000059e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 20 54 |--------|---.// T|
|000059f0| 43 61 6c 63 44 6f 63 75 | 6d 65 6e 74 3a 3a 44 6f |CalcDocu|ment::Do|
|00005a00| 4d 65 6e 75 43 6f 6d 6d | 61 6e 64 3a 20 0d 2f 2f |MenuComm|and: .//|
|00005a10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a20| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a30| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005a60| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 76 6f 69 64 20 54 43 |--------|.void TC|
|00005a70| 61 6c 63 44 6f 63 75 6d | 65 6e 74 3a 3a 44 6f 4d |alcDocum|ent::DoM|
|00005a80| 65 6e 75 43 6f 6d 6d 61 | 6e 64 28 43 6f 6d 6d 61 |enuComma|nd(Comma|
|00005a90| 6e 64 4e 75 6d 62 65 72 | 20 61 43 6f 6d 6d 61 6e |ndNumber| aComman|
|00005aa0| 64 4e 75 6d 62 65 72 29 | 09 2f 2f 20 4f 76 65 72 |dNumber)|.// Over|
|00005ab0| 72 69 64 65 0d 7b 0d 09 | 73 77 69 74 63 68 20 28 |ride.{..|switch (|
|00005ac0| 61 43 6f 6d 6d 61 6e 64 | 4e 75 6d 62 65 72 29 0d |aCommand|Number).|
|00005ad0| 09 7b 0d 09 09 63 61 73 | 65 20 63 52 65 63 61 6c |.{...cas|e cRecal|
|00005ae0| 63 75 6c 61 74 65 3a 0d | 09 09 09 7b 0d 09 09 09 |culate:.|...{....|
|00005af0| 09 44 6f 52 65 63 61 6c | 63 75 6c 61 74 65 28 6b |.DoRecal|culate(k|
|00005b00| 46 6f 72 63 65 41 75 74 | 6f 6d 61 74 69 63 2c 20 |ForceAut|omatic, |
|00005b10| 6b 55 70 64 61 74 65 44 | 65 70 65 6e 64 65 6e 63 |kUpdateD|ependenc|
|00005b20| 69 65 73 29 3b 0d 09 09 | 09 09 62 72 65 61 6b 3b |ies);...|..break;|
|00005b30| 0d 09 09 09 7d 0d 09 09 | 63 61 73 65 20 63 41 75 |....}...|case cAu|
|00005b40| 74 6f 43 61 6c 63 3a 0d | 09 09 09 7b 0d 09 09 09 |toCalc:.|...{....|
|00005b50| 09 66 43 61 6c 63 4d 6f | 64 65 20 3d 20 6b 41 75 |.fCalcMo|de = kAu|
|00005b60| 74 6f 6d 61 74 69 63 3b | 0d 09 09 09 09 44 6f 52 |tomatic;|.....DoR|
|00005b70| 65 63 61 6c 63 75 6c 61 | 74 65 28 6b 46 6f 72 63 |ecalcula|te(kForc|
|00005b80| 65 41 75 74 6f 6d 61 74 | 69 63 2c 20 6b 55 70 64 |eAutomat|ic, kUpd|
|00005b90| 61 74 65 44 65 70 65 6e | 64 65 6e 63 69 65 73 29 |ateDepen|dencies)|
|00005ba0| 3b 0d 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |;.....br|eak;....|
|00005bb0| 7d 0d 09 09 63 61 73 65 | 20 63 4d 61 6e 75 61 6c |}...case| cManual|
|00005bc0| 43 61 6c 63 3a 0d 09 09 | 09 7b 0d 09 09 09 09 66 |Calc:...|.{.....f|
|00005bd0| 43 61 6c 63 4d 6f 64 65 | 20 3d 20 6b 4d 61 6e 75 |CalcMode| = kManu|
|00005be0| 61 6c 3b 0d 09 09 09 09 | 62 72 65 61 6b 3b 0d 09 |al;.....|break;..|
|00005bf0| 09 09 7d 0d 0d 09 09 63 | 61 73 65 20 63 47 65 6e |..}....c|ase cGen|
|00005c00| 65 72 61 6c 3a 0d 09 09 | 63 61 73 65 20 63 4e 6f |eral:...|case cNo|
|00005c10| 44 65 63 69 6d 61 6c 3a | 0d 09 09 63 61 73 65 20 |Decimal:|...case |
|00005c20| 63 44 65 63 69 6d 61 6c | 3a 0d 09 09 63 61 73 65 |cDecimal|:...case|
|00005c30| 20 63 53 63 69 65 6e 74 | 69 66 69 63 3a 0d 09 09 | cScient|ific:...|
|00005c40| 63 61 73 65 20 63 53 79 | 73 74 65 6d 4a 75 73 74 |case cSy|stemJust|
|00005c50| 69 66 79 3a 0d 09 09 63 | 61 73 65 20 63 46 6f 72 |ify:...c|ase cFor|
|00005c60| 63 65 4c 65 66 74 4a 75 | 73 74 69 66 79 3a 0d 09 |ceLeftJu|stify:..|
|00005c70| 09 63 61 73 65 20 63 52 | 69 67 68 74 4a 75 73 74 |.case cR|ightJust|
|00005c80| 69 66 79 3a 0d 09 09 63 | 61 73 65 20 63 43 65 6e |ify:...c|ase cCen|
|00005c90| 74 65 72 3a 0d 09 09 09 | 7b 0d 09 09 09 09 50 6f |ter:....|{.....Po|
|00005ca0| 73 74 43 6f 6d 6d 61 6e | 64 28 54 48 5f 6e 65 77 |stComman|d(TH_new|
|00005cb0| 20 54 43 6f 6c 75 6d 6e | 46 6f 72 6d 61 74 74 65 | TColumn|Formatte|
|00005cc0| 72 28 74 68 69 73 2c 20 | 61 43 6f 6d 6d 61 6e 64 |r(this, |aCommand|
|00005cd0| 4e 75 6d 62 65 72 29 29 | 3b 0d 09 09 09 09 62 72 |Number))|;.....br|
|00005ce0| 65 61 6b 3b 0d 09 09 09 | 7d 0d 0d 09 09 64 65 66 |eak;....|}....def|
|00005cf0| 61 75 6c 74 3a 0d 09 09 | 09 7b 0d 09 09 09 09 54 |ault:...|.{.....T|
|00005d00| 45 64 69 74 69 6f 6e 44 | 6f 63 75 6d 65 6e 74 3a |EditionD|ocument:|
|00005d10| 3a 44 6f 4d 65 6e 75 43 | 6f 6d 6d 61 6e 64 28 61 |:DoMenuC|ommand(a|
|00005d20| 43 6f 6d 6d 61 6e 64 4e | 75 6d 62 65 72 29 3b 0d |CommandN|umber);.|
|00005d30| 09 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 09 7d 0d |....brea|k;....}.|
|00005d40| 09 7d 0d 7d 0d 0d 0d 2f | 2f 2d 2d 2d 2d 2d 2d 2d |.}.}.../|/-------|
|00005d50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005d60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005d70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005d80| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005d90| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005da0| 2d 0d 2f 2f 20 54 43 61 | 6c 63 44 6f 63 75 6d 65 |-.// TCa|lcDocume|
|00005db0| 6e 74 3a 3a 41 64 64 43 | 65 6c 6c 3a 20 0d 2f 2f |nt::AddC|ell: .//|
|00005dc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005dd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005de0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005df0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00005e10| 2d 2d 2d 2d 2d 2d 2d 2d | 0d 76 6f 69 64 20 54 43 |--------|.void TC|
|00005e20| 61 6c 63 44 6f 63 75 6d | 65 6e 74 3a 3a 41 64 64 |alcDocum|ent::Add|
|00005e30| 43 65 6c 6c 28 54 43 65 | 6c 6c 2a 20 74 68 65 43 |Cell(TCe|ll* theC|
|00005e40| 65 6c 6c 2c 0d 09 09 09 | 09 09 09 09 47 72 69 64 |ell,....|....Grid|
|00005e50| 43 65 6c 6c 20 69 74 73 | 4c 6f 63 29 0d 7b 0d 09 |Cell its|Loc).{..|
|00005e60| 74 68 65 43 65 6c 6c 2d | 3e 66 43 61 6c 63 44 6f |theCell-|>fCalcDo|
|00005e70| 63 75 6d 65 6e 74 20 3d | 20 74 68 69 73 3b 0d 09 |cument =| this;..|
|00005e80| 74 68 65 43 65 6c 6c 2d | 3e 66 4c 6f 63 61 74 69 |theCell-|>fLocati|
|00005e90| 6f 6e 20 3d 20 69 74 73 | 4c 6f 63 3b 0d 0d 09 66 |on = its|Loc;...f|
|00005ea0| 43 65 6c 6c 73 2e 49 6e | 73 65 72 74 28 74 68 65 |Cells.In|sert(the|
|00005eb0| 43 65 6c 6c 29 3b 0d 09 | 2b 2b 66 41 6c 6c 6f 63 |Cell);..|++fAlloc|
|00005ec0| 61 74 65 64 43 65 6c 6c | 73 3b 0d 0d 09 66 49 6e |atedCell|s;...fIn|
|00005ed0| 55 73 65 42 6f 75 6e 64 | 73 20 7c 3d 20 47 72 69 |UseBound|s |= Gri|
|00005ee0| 64 52 65 63 74 28 69 74 | 73 4c 6f 63 2c 20 69 74 |dRect(it|sLoc, it|
|00005ef0| 73 4c 6f 63 29 3b 0d 0d | 09 66 6f 72 20 28 43 53 |sLoc);..|.for (CS|
|00005f00| 65 63 74 69 6f 6e 49 74 | 65 72 61 74 6f 72 20 69 |ectionIt|erator i|
|00005f10| 74 65 72 28 74 68 69 73 | 29 3b 20 69 74 65 72 2e |ter(this|); iter.|
|00005f20| 43 75 72 72 65 6e 74 28 | 29 3b 20 2b 2b 69 74 65 |Current(|); ++ite|
|00005f30| 72 29 0d 23 69 66 20 64 | 65 66 69 6e 65 64 28 5f |r).#if d|efined(_|
|00005f40| 5f 53 43 5f 5f 29 20 7c | 7c 20 64 65 66 69 6e 65 |_SC__) ||| define|
|00005f50| 64 28 5f 5f 4d 52 43 5f | 5f 29 0d 09 09 69 66 20 |d(__MRC_|_)...if |
|00005f60| 28 28 2a 69 74 65 72 29 | 2e 47 65 74 53 65 63 74 |((*iter)|.GetSect|
|00005f70| 69 6f 6e 54 79 70 65 28 | 29 20 3d 3d 20 73 74 50 |ionType(|) == stP|
|00005f80| 75 62 6c 69 73 68 65 72 | 29 0d 23 65 6c 73 65 0d |ublisher|).#else.|
|00005f90| 09 09 69 66 20 28 69 74 | 65 72 2d 3e 47 65 74 53 |..if (it|er->GetS|
|00005fa0| 65 63 74 69 6f 6e 54 79 | 70 65 28 29 20 3d 3d 20 |ectionTy|pe() == |
|00005fb0| 73 74 50 75 62 6c 69 73 | 68 65 72 29 0d 23 65 6e |stPublis|her).#en|
|00005fc0| 64 69 66 0d 09 09 09 44 | 6f 54 6f 50 75 62 6c 69 |dif....D|oToPubli|
|00005fd0| 73 68 65 72 28 74 68 65 | 43 65 6c 6c 2c 20 64 79 |sher(the|Cell, dy|
|00005fe0| 6e 61 6d 69 63 5f 63 61 | 73 74 5f 41 43 28 54 50 |namic_ca|st_AC(TP|
|00005ff0| 75 62 6c 69 73 68 65 72 | 2a 2c 69 74 65 72 2e 43 |ublisher|*,iter.C|
|00006000| 75 72 72 65 6e 74 28 29 | 29 29 3b 0d 7d 0d 0d 0d |urrent()|));.}...|
|00006010| 2f 2f 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |//------|--------|
|00006020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006040| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006050| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006060| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 0d 2f 2f 20 54 43 |--------|--.// TC|
|00006070| 61 6c 63 44 6f 63 75 6d | 65 6e 74 3a 3a 43 65 6c |alcDocum|ent::Cel|
|00006080| 6c 45 78 69 73 74 73 3a | 20 0d 2f 2f 2d 2d 2d 2d |lExists:| .//----|
|00006090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000060e0| 2d 2d 2d 2d 0d 62 6f 6f | 6c 20 54 43 61 6c 63 44 |----.boo|l TCalcD|
|000060f0| 6f 63 75 6d 65 6e 74 3a | 3a 43 65 6c 6c 45 78 69 |ocument:|:CellExi|
|00006100| 73 74 73 28 47 72 69 64 | 43 65 6c 6c 20 69 74 73 |sts(Grid|Cell its|
|00006110| 4c 6f 63 29 0d 7b 0d 09 | 54 43 65 6c 6c 20 2a 20 |Loc).{..|TCell * |
|00006120| 61 43 65 6c 6c 20 3d 20 | 66 43 65 6c 6c 73 2e 47 |aCell = |fCells.G|
|00006130| 65 74 43 65 6c 6c 28 69 | 74 73 4c 6f 63 29 3b 0d |etCell(i|tsLoc);.|
|00006140| 0d 09 72 65 74 75 72 6e | 20 61 43 65 6c 6c 20 26 |..return| aCell &|
|00006150| 26 20 21 61 43 65 6c 6c | 2d 3e 49 73 44 65 6c 65 |& !aCell|->IsDele|
|00006160| 74 65 64 28 29 3b 0d 7d | 0d 0d 0d 2f 2f 2d 2d 2d |ted();.}|...//---|
|00006170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000061a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000061b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000061c0| 2d 2d 2d 2d 2d 0d 2f 2f | 20 54 43 61 6c 63 44 6f |-----.//| TCalcDo|
|000061d0| 63 75 6d 65 6e 74 3a 3a | 44 65 6c 65 74 65 43 65 |cument::|DeleteCe|
|000061e0| 6c 6c 3a 20 0d 2f 2f 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ll: .//-|--------|
|000061f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006210| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006220| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00006230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 0d |--------|-------.|
|00006240| 76 6f 69 64 20 54 43 61 | 6c 63 44 6f 63 75 6d 65 |void TCa|lcDocume|
|00006250| 6e 74 3a 3a 44 65 6c 65 | 74 65 43 65 6c 6c 28 47 |nt::Dele|teCell(G|
|00006260| 72 69 64 43 65 6c 6c 20 | 69 74 73 4c 6f 63 29 0d |ridCell |itsLoc).|
|00006270| 7b 0d 09 54 43 65 6c 6c | 2a 20 74 68 65 43 65 6c |{..TCell|* theCel|
|00006280| 6c 20 3d 20 47 65 74 45 | 78 69 73 74 69 6e 67 43 |l = GetE|xistingC|
|00006290| 65 6c 6c 28 69 74 73 4c | 6f 63 29 3b 0d 09 69 66 |ell(itsL|oc);..if|
|000062a0| 20 28 74 68 65 43 65 6c | 6c 20 26 26 20 21 74 68 | (theCel|l && !th|
|000062b0| 65 43 65 6c 6c 2d 3e 49 | 73 44 65 6c 65 74 65 64 |eCell->I|sDeleted|
|000062c0| 28 29 29 0d 09 7b 0d 09 | 09 74 68 65 43 65 6c 6c |())..{..|.theCell|
|000062d0| 2d 3e 53 65 74 44 65 6c | 65 74 65 53 74 61 74 65 |->SetDel|eteState|
|000062e0| 28 74 72 75 65 29 3b 0d | 09 09 66 41 6c 6c 6f 63 |(true);.|..fAlloc|
|000062f0| 61 74 65 64 43 65 6c 6c | 73 20 3d 20 66 41 6c 6c |atedCell|s = fAll|
|00006300| 6f 63 61 74 65 64 43 65 | 6c 6c 73 20 2d 20 31 3b |ocatedCe|lls - 1;|
|00006310| 0d 09 09 69 66 20 28 74 | 68 65 43 65 6c 6c 20 3d |...if (t|heCell =|
|00006320| 3d 20 66 45 64 69 74 43 | 65 6c 6c 29 0d 09 09 09 |= fEditC|ell)....|
|00006330| 66 45 6e 74 72 79 56 69 | 65 77 2d 3e 53 65 74 54 |fEntryVi|ew->SetT|
|00006340| 6f 53 74 72 69 6e 67 28 | 73 74 61 74 69 63 5f 63 |oString(|static_c|
|00006350| 61 73 74 3c 63 6f 6e 73 | 74 20 43 50 61 73 63 61 |ast<cons|t CPasca|
|00006360| 6c 53 74 72 5f 41 43 26 | 3e 28 67 45 6d 70 74 79 |lStr_AC&|>(gEmpty|
|00006370| 53 74 72 69 6e 67 29 29 | 3b 0d 09 7d 0d 7d 0d 0d |String))|;..}.}..|
|00006380| 0d 2f 2f 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.//-----|--------|
|00006390| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000063a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000063b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000063c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000063d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 2f 2f 20 54 |--------|---.// T|
|000063e0| 43 61 6c 63 44 6f 63 75 | 6d 65 6e 74 3a 3a 49 73 |CalcDocu|ment::Is|
|000063f0| 45 78 69 73 74 69 6e 67 | 43 65 6c 6c 3a 20 0d 2f |Existing|Cell: ./|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.